diff options
| author | Fred Fish <fnf@specifix.com> | 1992-04-18 02:30:28 +0000 |
|---|---|---|
| committer | Fred Fish <fnf@specifix.com> | 1992-04-18 02:30:28 +0000 |
| commit | 1867b3be843be289d478ea3a7833efafb3ac9ba8 (patch) | |
| tree | be3b36780ae45fef93a5969904227cf3f4f4eaba /gdb/m2-exp.y | |
| parent | c3089ec904b4a3a7d99449a067aaec6119eea4a2 (diff) | |
| download | fsf-binutils-gdb-1867b3be843be289d478ea3a7833efafb3ac9ba8.zip fsf-binutils-gdb-1867b3be843be289d478ea3a7833efafb3ac9ba8.tar.gz fsf-binutils-gdb-1867b3be843be289d478ea3a7833efafb3ac9ba8.tar.bz2 | |
Back out of TYPE_FLAG_FUND_TYPE change, solve the problem in valprint.c by
just printing the type name from the type if it is not otherwise handled.
Implement new handling of the ".syms" file for reusable symbol files.
Diffstat (limited to 'gdb/m2-exp.y')
| -rw-r--r-- | gdb/m2-exp.y | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/gdb/m2-exp.y b/gdb/m2-exp.y index 54a6bda..1c3d900 100644 --- a/gdb/m2-exp.y +++ b/gdb/m2-exp.y @@ -1236,23 +1236,23 @@ _initialize_m2_exp () /* Modula-2 "pervasive" types. NOTE: these can be redefined!!! */ builtin_type_m2_int = init_type (TYPE_CODE_INT, TARGET_INT_BIT / TARGET_CHAR_BIT, - TYPE_FLAG_FUND_TYPE, + 0, "INTEGER", (struct objfile *) NULL); builtin_type_m2_card = init_type (TYPE_CODE_INT, TARGET_INT_BIT / TARGET_CHAR_BIT, - TYPE_FLAG_FUND_TYPE | TYPE_FLAG_UNSIGNED, + TYPE_FLAG_UNSIGNED, "CARDINAL", (struct objfile *) NULL); builtin_type_m2_real = init_type (TYPE_CODE_FLT, TARGET_FLOAT_BIT / TARGET_CHAR_BIT, - TYPE_FLAG_FUND_TYPE, + 0, "REAL", (struct objfile *) NULL); builtin_type_m2_char = init_type (TYPE_CODE_CHAR, TARGET_CHAR_BIT / TARGET_CHAR_BIT, - TYPE_FLAG_FUND_TYPE | TYPE_FLAG_UNSIGNED, + TYPE_FLAG_UNSIGNED, "CHAR", (struct objfile *) NULL); builtin_type_m2_bool = init_type (TYPE_CODE_BOOL, TARGET_INT_BIT / TARGET_CHAR_BIT, - TYPE_FLAG_FUND_TYPE | TYPE_FLAG_UNSIGNED, + TYPE_FLAG_UNSIGNED, "BOOLEAN", (struct objfile *) NULL); TYPE_NFIELDS(builtin_type_m2_bool) = 2; |