Megatest

Artifact 4b166181e3b3165a3b5024dd062dbd03fedd909f:

• File testbuild/gui.scm — part of check-in [39f1ace0d3] at 2021-11-14 15:33:22 on branch v1.6584-nanomsg — Added -M to obj build to fix issue with dashboard not starting (user: matt, size: 325) [annotate] [blame] [check-ins using]

;; 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)