diff options
Diffstat (limited to 'src/interp/i-output.boot')
| -rw-r--r-- | src/interp/i-output.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/i-output.boot b/src/interp/i-output.boot index 0f7eb681..ccb6fcf7 100644 --- a/src/interp/i-output.boot +++ b/src/interp/i-output.boot @@ -394,7 +394,7 @@ newlineIfDisplaying() == specialChar(symbol) == -- looks up symbol in $specialCharacterAlist, gets the index -- into the EBCDIC table, and returns the appropriate character - null (code := IFCDR ASSQ(symbol,$specialCharacterAlist)) => '"?" + null (code := IFCDR objectAssoc(symbol,$specialCharacterAlist)) => '"?" $specialCharacters.code rbrkSch() == symbolName specialChar 'rbrk |