diff options
Diffstat (limited to 'src/interp/br-saturn.boot')
-rw-r--r-- | src/interp/br-saturn.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/br-saturn.boot b/src/interp/br-saturn.boot index e0a3bcd4..4b7f17c1 100644 --- a/src/interp/br-saturn.boot +++ b/src/interp/br-saturn.boot @@ -1633,7 +1633,7 @@ bcConform1 form == main where -- too, until we fix that. string? form or not isConstructorName form => s := - string? form => strconc("_"",form,"_"") + string? form => strconc('"_"",form,'"_"") STRINGIMAGE form (s.0 = char '_#) => (n := POSN1(form, $FormalFunctionParameterList)) => |