diff options
Diffstat (limited to 'test.icl')
-rw-r--r-- | test.icl | 6 |
1 files changed, 6 insertions, 0 deletions
@@ -33,6 +33,7 @@ Start w # (t1,s) = test_string s # (t2,s) = test_double s # (t3,s) = test_two_params s +# (t4,s) = test_void s # tests = [t0,t1,t2,t3] # passed = and tests # (io, w) = stdio w @@ -74,3 +75,8 @@ test_two_params s # (i, s) = cCall Int "test_two_params" (13,29) s = (fromCParam i == 42, s) +test_void :: *State -> (Bool, *State) +test_void s +# (i, s) = cCall Void "test_void" "Testing void function\n" s += (i == CV, s) + |