Skip to content

Instantly share code, notes, and snippets.

@abeaumont

abeaumont/split-test.dylan

Created February 6, 2012 21:05
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save abeaumont/1754863 to your computer and use it in GitHub Desktop.
Save abeaumont/1754863 to your computer and use it in GitHub Desktop.
Download ZIP
split bug
Raw
split-test.dylan
module: split-test
define function main(name, arguments)
format-out("%d %d\n",
size(split("a b c ", " ", remove-if-empty: #f)),
size(split("a b c ", " ", remove-if-empty: #t)));
exit-application(0);
end function main;
main(application-name(), application-arguments());
@abeaumont
Copy link
Author

Result:

$ split-test 
4 4

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment