diff options
Diffstat (limited to 'src/boot/scanner.boot')
| -rw-r--r-- | src/boot/scanner.boot | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/src/boot/scanner.boot b/src/boot/scanner.boot index 8066ee94..4522e2b1 100644 --- a/src/boot/scanner.boot +++ b/src/boot/scanner.boot @@ -112,11 +112,6 @@ shoeLineToks(s)== ($ln,$linepos,shoeLeafLine command,0) [[dq],:$r] command:=shoeLisp? $ln=> shoeLispToken($r,command) - command:=shoePackage? $ln=> - a := strconc('"(IN-PACKAGE ",command,'")") - dq:=dqUnit shoeConstructToken - ($ln,$linepos,shoeLeafLisp a,0) - [[dq],:$r] shoeLineToks $r toks:=[] while $n<$sz repeat toks:=dqAppend(toks,shoeToken()) |