suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix 3m problem with display of symbols

Browse Source 
svn: r3786
This commit is contained in:
Matthew Flatt 2006-07-23 14:57:57 +00:00
parent 2b57fdc1b2
commit 4c1758866c
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/mzscheme/src/portfun.c
View File

@ -3792,7 +3792,8 @@ display_write(char *name,
SCHEME_CHAR_STR_VAL(v), 0, SCHEME_CHAR_STRLEN_VAL(v)); SCHEME_CHAR_STR_VAL(v), 0, SCHEME_CHAR_STRLEN_VAL(v));
} else if (SCHEME_SYMBOLP(v)) { } else if (SCHEME_SYMBOLP(v)) {
scheme_put_byte_string(name, port, scheme_put_byte_string(name, port,
SCHEME_SYM_VAL(v), 0, SCHEME_SYM_LEN(v), (char *)v, ((char *)(SCHEME_SYM_VAL(v))) - ((char *)v),
SCHEME_SYM_LEN(v),
0); 0);
} else } else
scheme_internal_display(v, port); scheme_internal_display(v, port);