diff options
Diffstat (limited to 'src/interp/i-spec1.boot')
| -rw-r--r-- | src/interp/i-spec1.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/i-spec1.boot b/src/interp/i-spec1.boot index 88a7675b..48cf90fa 100644 --- a/src/interp/i-spec1.boot +++ b/src/interp/i-spec1.boot @@ -536,7 +536,7 @@ upLoopIterSTEP(index,lower,step,upperList) == throwKeyedMsg("S2IS0007",['"upper"]) if utype then types := [utype, :types] else types := [stype, :types] - type := resolveTypeListAny REMDUP types + type := resolveTypeListAny removeDuplicates types put(index,'mode,type,$env) mkLocalVar('"the iterator expression",index) |