/trunk/Examples/chicken/simple/test-simple.scm
Lisp | 28 lines | 20 code | 7 blank | 1 comment | 0 complexity | afaa468d1f82ffcee67b4c229e376957 MD5 | raw file
1;; feel free to uncomment and comment sections 2(load-library 'example "simple.so") 3 4(display "(My-variable): ") 5(display (My-variable)) 6(display "\n") 7 8(display "(My-variable 3.141259): ") 9(display (My-variable 3.141259)) 10(display "\n") 11 12(display "(My-variable): ") 13(display (My-variable)) 14(display "\n") 15 16(display "(fact 5): ") 17(display (fact 5)) 18(display "\n") 19 20(display "(mod 75 7): ") 21(display (mod 75 7)) 22(display "\n") 23 24(display "(get-time): ") 25(display (get-time)) 26(display "\n") 27 28(exit)