Skip to content

Instantly share code, notes, and snippets.

@hashmal

hashmal/testing-demo.shk

Created April 15, 2013 23:41
Show Gist options
  • Save hashmal/5392218 to your computer and use it in GitHub Desktop.
Save hashmal/5392218 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
testing-demo.shk
(with) "lib/atl.shk"
(test/runSuite) [
("true" test/case) [ -- this test always succeeds
(test/assertions) [
[ TRUE ]
]
]
("parse a single symbol" test/case) [
"hello" $parse
uncons -> sym -> rem
(test/assertions) [
[ sym :hello unquote = ]
[ rem length >< << 0 = ]
]
]
]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment