aboutsummaryrefslogtreecommitdiff
path: root/src/interp/pspad1.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/pspad1.boot')
-rw-r--r--src/interp/pspad1.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/pspad1.boot b/src/interp/pspad1.boot
index a9d40822..a89253f9 100644
--- a/src/interp/pspad1.boot
+++ b/src/interp/pspad1.boot
@@ -152,8 +152,8 @@ mkCommentLines [.,n,.,s] ==
breakComments s ==
n:= containsString(s,PNAME "ENDOFLINECHR") =>
- #s>n+12 => [SUBSTRING(s,0,n),:breakComments SUBSTRING(s,n+12,NIL)]
- [SUBSTRING(s,0,n)]
+ #s>n+12 => [subString(s,0,n),:breakComments subString(s,n+12)]
+ [subString(s,0,n)]
[s]
containsString(x,y) ==