Megatest

gui.scm at [39f1ace0d3]
Login

File testbuild/gui.scm artifact 4b166181e3 part of check-in 39f1ace0d3


;; a command line only executable

(declare (uses m1))
(declare (uses m2))
(declare (uses m3))

(module gui-guts
	*

(import scheme
	chicken.base
	m1
	m2
	m3
	)

(define (main)
  (a)
  (c)
  (print "I'm main from cl.scm, let's start a gui ...")
  (print "Got "(try-an-eval)" from try an eval"))

)

(import gui-guts)

(main)