aboutsummaryrefslogtreecommitdiff
path: root/src/interp/pspad2.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/pspad2.boot')
-rw-r--r--src/interp/pspad2.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/pspad2.boot b/src/interp/pspad2.boot
index ed99dbd6..ecbcedb0 100644
--- a/src/interp/pspad2.boot
+++ b/src/interp/pspad2.boot
@@ -558,7 +558,7 @@ nary2Binary(u,op) ==
string2PrintImage s ==
u:= GETSTR (2*SIZE s)
for i in 0..MAXINDEX s repeat
- (if MEMQ(s.i,'(_( _{ _) _} _! _")) then
+ (if s.i in '(_( _{ _) _} _! _") then
SUFFIX('__,u); u:= SUFFIX(s.i,u))
u