Finally make a clean sweep and delete / organize old files. Add skeleton for LaTeX formal writeup in doc/ and change license (since this is all new code from the past few years) to BSD-2-Clause-Patent
This commit is contained in:
35
working_files/partial_eval_test.csc
Normal file
35
working_files/partial_eval_test.csc
Normal file
@@ -0,0 +1,35 @@
|
||||
|
||||
|
||||
; Going to set some aliases just for this, the scheme version
|
||||
; commenting out the first let with it's final ) should make this
|
||||
; legal kraken
|
||||
(import (chicken process-context))
|
||||
(import (chicken port))
|
||||
(load "partial_eval.csc")
|
||||
(import (partial_eval))
|
||||
(let* (
|
||||
(array list)
|
||||
(concat append)
|
||||
(len length)
|
||||
(idx list-ref)
|
||||
|
||||
;(array vector)
|
||||
;(concat vector-append) ; only in extension vector library!
|
||||
;(len vector-length)
|
||||
;(idx vector-ref)
|
||||
|
||||
(= equal?)
|
||||
)
|
||||
|
||||
(print (array 1 2 3))
|
||||
(print (command-line-arguments))
|
||||
|
||||
(print (call-with-input-string "'(1 2)" (lambda (p) (read p))))
|
||||
|
||||
(print partial_eval)
|
||||
|
||||
|
||||
)
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user