nomsu/lib/testing.nom

require "lib/metaprogramming.nom"

# For unit testing
rule [test tree %generated == %expected] =:
    if (%generated != %expected):
        error ".."
            Test Failed!
            Expected:
            \(%expected)
            But got:
            \(%generated)
parse [test %code yields %expected] as:
    test tree (nomsu "tree_to_str" [\%code]) == %expected
Another overhaul, this time pulling all the chunks of the core lib into their own files. 2017-09-21 00:10:26 -07:00			`require "lib/metaprogramming.nom"`

			`# For unit testing`
Updated to undo some of the block/thunk stuff. Thunks are thunks, and expressions can be grouped with parens, and they have a clear distinction. 2017-10-02 17:21:22 -07:00			`rule [test tree %generated == %expected] =:`
Another overhaul, this time pulling all the chunks of the core lib into their own files. 2017-09-21 00:10:26 -07:00			`if (%generated != %expected):`
Updated to undo some of the block/thunk stuff. Thunks are thunks, and expressions can be grouped with parens, and they have a clear distinction. 2017-10-02 17:21:22 -07:00			`error ".."`
Updating some more stuff. 2017-12-14 13:57:53 -08:00			`Test Failed!`
			`Expected:`
			`\(%expected)`
			`But got:`
			`\(%generated)`
Updated to undo some of the block/thunk stuff. Thunks are thunks, and expressions can be grouped with parens, and they have a clear distinction. 2017-10-02 17:21:22 -07:00			`parse [test %code yields %expected] as:`
			`test tree (nomsu "tree_to_str" [\%code]) == %expected`