diff options
Diffstat (limited to 'src/interp')
| -rw-r--r-- | src/interp/c-doc.boot | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/interp/c-doc.boot b/src/interp/c-doc.boot index 2208da20..6e5fb843 100644 --- a/src/interp/c-doc.boot +++ b/src/interp/c-doc.boot @@ -806,9 +806,9 @@ checkDecorate u == => u := v acc - x = char '_$ or x is '"$" => ['"\$",:acc] - x = char '_% or x is '"%" => ['"\%",:acc] - x = char '_, or x is '"," => + char? x and x = char '_$ or x is '"$" => ['"\$",:acc] + char? x and x = char '_% or x is '"%" => ['"\%",:acc] + char? x and x = char '_, or x is '"," => spadflag => ['",",:acc] ['",{}",:acc] x is '"\spad" => ['"\spad",:acc] |