diff options
| author | Per Bothner <per@bothner.com> | 1995-11-30 03:10:59 +0000 |
|---|---|---|
| committer | Per Bothner <per@bothner.com> | 1995-11-30 03:10:59 +0000 |
| commit | dcdba37e2d5970979f1d87cef209495aae83f94c (patch) | |
| tree | c3e9e34886d4b856ebf51ca2d01aa46514832cf1 /gdb/scm-valprint.c | |
| parent | b18319318b4b69be9fb1b834846414981238bc12 (diff) | |
| download | gdb-dcdba37e2d5970979f1d87cef209495aae83f94c.zip gdb-dcdba37e2d5970979f1d87cef209495aae83f94c.tar.gz gdb-dcdba37e2d5970979f1d87cef209495aae83f94c.tar.bz2 | |
* scm-valprint.c (scm_isymnames): Remove "#@" prefix.
(scm_scmval_print): Do not print "#@" prefix.
* mdebugread.c: Add check_typedef/CHECK_TYPEDEF as needed.
Diffstat (limited to 'gdb/scm-valprint.c')
| -rw-r--r-- | gdb/scm-valprint.c | 37 |
1 files changed, 18 insertions, 19 deletions
diff --git a/gdb/scm-valprint.c b/gdb/scm-valprint.c index de59220..8544870 100644 --- a/gdb/scm-valprint.c +++ b/gdb/scm-valprint.c @@ -49,26 +49,26 @@ scm_inferior_print (value, stream, format, deref_ref, recurse, pretty) static char *scm_isymnames[] = { /* This table must agree with the declarations */ - "#@and", - "#@begin", - "#@case", - "#@cond", - "#@do", - "#@if", - "#@lambda", - "#@let", - "#@let*", - "#@letrec", - "#@or", - "#@quote", - "#@set!", - "#@define", + "and", + "begin", + "case", + "cond", + "do", + "if", + "lambda", + "let", + "let*", + "letrec", + "or", + "quote", + "set!", + "define", #if 0 - "#@literal-variable-ref", - "#@literal-variable-set!", + "literal-variable-ref", + "literal-variable-set!", #endif - "#@apply", - "#@call-with-current-continuation", + "apply", + "call-with-current-continuation", /* user visible ISYMS */ /* other keywords */ @@ -178,7 +178,6 @@ scm_scmval_print (svalue, stream, format, deref_ref, recurse, pretty) break; case 1: /* gloc */ - fputs_filtered ("#@", stream); svalue = SCM_CAR (svalue - 1); goto taloop; default: |