diff options
| author | dos-reis <gdr@axiomatics.org> | 2008-10-30 02:41:06 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2008-10-30 02:41:06 +0000 |
| commit | e83556dbb044ac9237d7964e7ae1e85079cdcedd (patch) | |
| tree | 5d8384c01ff08e8db7989b8bf96c59d1d34c2b79 /src/interp/i-map.boot | |
| parent | e65cdbacb778bc7a3b1ebfb0441091b1032a1387 (diff) | |
| download | open-axiom-e83556dbb044ac9237d7964e7ae1e85079cdcedd.tar.gz | |
* interp/i-analy.boot (bottomUpDefaultCompile): Declared local
variables really are locals.
* interp/i-map.boot (findLocalVars1): Fix typo.
Diffstat (limited to 'src/interp/i-map.boot')
| -rw-r--r-- | src/interp/i-map.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/i-map.boot b/src/interp/i-map.boot index be2c923e..241ba8e0 100644 --- a/src/interp/i-map.boot +++ b/src/interp/i-map.boot @@ -1014,7 +1014,7 @@ findLocalVars1(op,form) == (atom a) or (a is ['_:,a,.]) => mkLocalVar(op,a) findLocalVars1(op,b) - findLocalVars(op,b) + findLocalVars1(op,b) for x in a repeat findLocalVars1(op,x) form is ['_:,a,.] => mkLocalVar(op,a) |