aboutsummaryrefslogtreecommitdiff
path: root/src/interp/setvars.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2008-01-26 23:33:47 +0000
committerdos-reis <gdr@axiomatics.org>2008-01-26 23:33:47 +0000
commit228450b9bdf11e3a51dc0e2069bf7e12cc99d3a9 (patch)
tree051fff1be001d6f433099fa358022ad251d7b3a4 /src/interp/setvars.boot
parent31a2bea16b21b23a129599b2fd84843e58ac9273 (diff)
downloadopen-axiom-228450b9bdf11e3a51dc0e2069bf7e12cc99d3a9.tar.gz
* interp/database.boot: Tidy uses of $EmptyEnvironment.
* interp/i-map.boot: Likewise. Allocate fresh cell for $env. * interp/i-spec1.boot: Likewise. * interp/i-syscmd.boot: Likewise. * interp/i-toplev.boot: Likewise. * interp/lisplib.boot: Likewise. * interp/setvars.boot: Likewise. * interp/sys-globals.boot: Likewise. * interp/nruncomp.boot: Encode flag types too. * interp/template.boot: Likewise. * share/algebra: Update databases.
Diffstat (limited to 'src/interp/setvars.boot')
-rw-r--r--src/interp/setvars.boot6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/interp/setvars.boot b/src/interp/setvars.boot
index 4aee9c65..eec432a5 100644
--- a/src/interp/setvars.boot
+++ b/src/interp/setvars.boot
@@ -1,6 +1,6 @@
-- Copyright (c) 1991-2002, The Numerical ALgorithms Group Ltd.
-- All rights reserved.
--- Copyright (C) 2007, Gabriel Dos Reis.
+-- Copyright (C) 2007-2008, Gabriel Dos Reis.
-- All rights reserved.
--
-- Redistribution and use in source and binary forms, with or without
@@ -158,8 +158,8 @@ resetWorkspaceVariables() ==
SETQ($dependeeClosureAlist , NIL)
SETQ($IOindex , 1 )
SETQ($coerceIntByMapCounter , 0 )
- SETQ($e , [$EmptyEnvironment])
- SETQ($env , [$EmptyEnvironment])
+ SETQ($e , $EmptyEnvironment)
+ SETQ($env , [[nil]])
-- many variables set by the following