diff options
Diffstat (limited to 'src/interp/newfort.boot')
-rw-r--r-- | src/interp/newfort.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/newfort.boot b/src/interp/newfort.boot index c115dfcf..96240a71 100644 --- a/src/interp/newfort.boot +++ b/src/interp/newfort.boot @@ -286,7 +286,7 @@ fortran2Lines f == fs := NIL lines := NIL while f repeat - while f and (ff := first(f)) ^= '"%l" repeat + while f and (ff := first(f)) ~= '"%l" repeat fs := [ff,:fs] f := rest f if f and first(f) = '"%l" then f := rest f |