diff options
Diffstat (limited to 'src/interp/database.boot')
| -rw-r--r-- | src/interp/database.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/database.boot b/src/interp/database.boot index 943b635f..8ba828f8 100644 --- a/src/interp/database.boot +++ b/src/interp/database.boot @@ -701,7 +701,7 @@ dropPrefix(fn) == --++ egName := nil --++ egFiles := nil --++ while (x:= readLine stream) ~= %nothing repeat ---++ x := DROPTRAILINGBLANKS x +--++ x := trimTrailingBlank x --++ # x = 0 => 'iterate -- blank line --++ (x.0 = char "#") or (x.0 = char "*") => 'iterate -- comment --++ x.0 = char " " => |