Index: Makefile ================================================================== --- Makefile +++ Makefile @@ -218,11 +218,12 @@ echo "(define megatest-fossil-hash \"$(MTESTHASH)\")" > megatest-fossil-hash.new if ! diff -q megatest-fossil-hash.new megatest-fossil-hash.scm ; then echo copying .new to .scm;cp -f megatest-fossil-hash.new megatest-fossil-hash.scm;fi $(OFILES) $(GOFILES) : common_records.scm -%.o : %.scm +# TODO: make modules.scm changes trigger rebuild. modules.scm in following recipe does not work. +%.o : %.scm modules.scm csc $(CSCOPTS) -c $< $(PREFIX)/bin/.$(ARCHSTR)/mtest : mtest utils/mk_wrapper @echo Installing to PREFIX=$(PREFIX) $(INSTALL) mtest $(PREFIX)/bin/.$(ARCHSTR)/mtest Index: modules.scm ================================================================== --- modules.scm +++ modules.scm @@ -18,7 +18,13 @@ ;;====================================================================== (use (prefix mtargs args:)) (use (prefix mtdebug debug:)) (use (prefix mtconfigf configf:)) -(define debug:print debug:dprint) ;; cannot name it print in mtdebug module -(define args:any? args:any-defined?) ;; canot name it any? in mtargs module + +(print "BB> called once") +(configf:add-eval-string "(use (prefix mtargs args:)) + (use (prefix mtdebug debug:)) + (use (prefix mtconfigf configf:))") + + +