spook

A "game" for the 2023 Autumn Lisp Game Jam. Won first place! (from the bottom...)
git clone https://kaka.farm/~git/spook
Log | Files | Refs | LICENSE

run.scm (396B)

      1 ;;;; run.scm - overly simplistic spock test
      2 
      3 
      4 (import scheme (chicken base) spock)
      5 
      6 (print "\nGenerating some trivial JS:\n")
      7 
      8 (display (<spock-header> debug: #t))
      9 (display #`(print #^(+ 3 4)))
     10 
     11 (print "\nUsing `bind':\n")
     12 (spock 'bind "test-bind.js"
     13        'code '(begin 
     14 		(print ($ "abc"))
     15 		(print (Math.sin 42))
     16 		(print (gurgle (vector "yes" "no") 1))
     17 		(print yes)
     18 		(set! one.two "ok")))