conforms with chicken "egg" standard. Got rid of ##csi#run for relinking the Scheme interpreter as no longer needed. Changed all documentation to reflect both changes. git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@4411 626c5289-ae23-0410-ae9c-e8d60b6d4f22
43 lines
939 B
Scheme
43 lines
939 B
Scheme
;; run with './simple test-simple.scm'
|
|
;; feel free to uncomment and comment sections
|
|
|
|
(display "(example:My-variable): ")
|
|
(display (example:My-variable))
|
|
(display "\n")
|
|
|
|
(display "(example:My-variable 3.141259): ")
|
|
(display (example:My-variable 3.141259))
|
|
(display "\n")
|
|
|
|
(display "(example:My-variable): ")
|
|
(display (example:My-variable))
|
|
(display "\n")
|
|
|
|
(display "(example:My-variable 'a): ")
|
|
;;(display (example:My-variable 'a))
|
|
(display "\n")
|
|
|
|
(display "(example:My-variable 1.5 'b): ")
|
|
(display (example:My-variable 1.5 'b))
|
|
(display "\n")
|
|
|
|
(display "(example:fact 5): ")
|
|
(display (example:fact 5))
|
|
(display "\n")
|
|
|
|
(display "(example:fact 'a): ")
|
|
;;(display (example:fact 'a))
|
|
(display "\n")
|
|
|
|
(display "(example:mod 75 7): ")
|
|
(display (example:mod 75 7))
|
|
(display "\n")
|
|
|
|
(display "(example:my-mod 75 7): ")
|
|
(display (example:my-mod 75 7))
|
|
(display "\n")
|
|
|
|
|
|
(display "(example:get-time): ")
|
|
(display (example:get-time))
|
|
(display "\n")
|