From 8cb5cda46cf3aef847ae3926dc53a5e5f87fe261 Mon Sep 17 00:00:00 2001
From: Joel Martin <github@martintribe.org>
Date: Wed, 16 Apr 2014 23:57:50 -0500
Subject: All: move some fns to core. Major cleanup.

- Don't import/require core until step4.
- Define cond/or macros from step8
---
 ps/step3_env.ps | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'ps/step3_env.ps')

diff --git a/ps/step3_env.ps b/ps/step3_env.ps
index e94f92c..42eda2c 100644
--- a/ps/step3_env.ps
+++ b/ps/step3_env.ps
@@ -81,8 +81,8 @@ end } def
 /repl_env null null null env_new def
 
 /REP { READ repl_env EVAL PRINT } def
-/_ref { repl_env 3 1 roll env_set pop } def
 
+/_ref { repl_env 3 1 roll env_set pop } def
 (+) { dup 0 _nth exch 1 _nth add } _ref
 (-) { dup 0 _nth exch 1 _nth sub } _ref
 (*) { dup 0 _nth exch 1 _nth mul } _ref
-- 
cgit v1.2.3