diff options
Diffstat (limited to 'src/interp/g-cndata.boot.pamphlet')
| -rw-r--r-- | src/interp/g-cndata.boot.pamphlet | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/interp/g-cndata.boot.pamphlet b/src/interp/g-cndata.boot.pamphlet index 7e09df96..6c0efdac 100644 --- a/src/interp/g-cndata.boot.pamphlet +++ b/src/interp/g-cndata.boot.pamphlet @@ -46,6 +46,9 @@ <<*>>= <<license>> +import '"sys-macros" +)package "BOOT" + --% Manipulation of Constructor Datat --======================================================================= @@ -241,7 +244,7 @@ condUnabbrev(op,arglist,argtypes,modeIfTrue) == #arglist ^= #argtypes => throwKeyedMsg("S2IL0014",[op,plural(#argtypes,'"argument"), bright(#arglist)]) - [newArg for arg in arglist for type in argtypes] where newArg == + [newArg for arg in arglist for type in argtypes] where newArg() == categoryForm?(type) => unabbrev1(arg,modeIfTrue) arg |