From 96f1845afdb816515bba83ad4bb8fee6bc466557 Mon Sep 17 00:00:00 2001 From: Joel Martin Date: Fri, 2 Jan 2015 23:33:50 -0600 Subject: Misc cleanup. Move *host-language* to stepA. --- make/step9_try.mk | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) (limited to 'make') diff --git a/make/step9_try.mk b/make/step9_try.mk index 1474302..587f400 100644 --- a/make/step9_try.mk +++ b/make/step9_try.mk @@ -166,7 +166,6 @@ _argv := $(call _list) REPL_ENV := $(call ENV_SET,$(REPL_ENV),*ARGV*,$(_argv)) # core.mal: defined in terms of the language itself -$(call do,$(call REP, (def! *host-language* "make") )) $(call do,$(call REP, (def! not (fn* (a) (if a false true))) )) $(call do,$(call REP, (def! load-file (fn* (f) (eval (read-string (str "(do " (slurp f) ")"))))) )) $(call do,$(call REP, (defmacro! cond (fn* (& xs) (if (> (count xs) 0) (list 'if (first xs) (if (> (count xs) 1) (nth xs 1) (throw "odd number of forms to cond")) (cons 'cond (rest (rest xs))))))) )) @@ -180,9 +179,7 @@ $(if $(MAKECMDGOALS),\ $(eval INTERACTIVE :=),) # repl loop -$(if $(strip $(INTERACTIVE)),\ - $(call do,$(call REP, (println (str "Mal [" *host-language* "]")) )) \ - $(call REPL)) +$(if $(strip $(INTERACTIVE)),$(call REPL)) .PHONY: none $(MAKECMDGOALS) none $(MAKECMDGOALS): -- cgit v1.2.3