aboutsummaryrefslogtreecommitdiff
path: root/src/interp/wi1.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/wi1.boot')
-rw-r--r--src/interp/wi1.boot10
1 files changed, 5 insertions, 5 deletions
diff --git a/src/interp/wi1.boot b/src/interp/wi1.boot
index db0ae6cd..a0602500 100644
--- a/src/interp/wi1.boot
+++ b/src/interp/wi1.boot
@@ -1174,12 +1174,12 @@ compDefineCategory2(form,signature,specialCases,body,m,e,
$prefix,$formalArgList) ==
--1. bind global variables
$insideCategoryIfTrue: local:= true
- $TOP__LEVEL: local
- $definition: local
+ $TOP__LEVEL: local := nil
+ $definition: local := nil
--used by DomainSubstitutionFunction
- $form: local
- $op: local
- $extraParms: local
+ $form: local := nil
+ $op: local := nil
+ $extraParms: local := nil
--Set in DomainSubstitutionFunction, used further down
-- 1.1 augment e to add declaration $: <form>
[$op,:argl]:= $definition:= form