+2000-08-03 Zack Weinberg <zack@wolery.cumb.org>
+
+ * cpplex.c (parse_name): Might have to glue a CPP_OTHER token
+ before the name.
+ (lex_line): Glue @ onto the beginning of identifiers and
+ string constants, in Objective-C mode.
+ (output_token, spell_token): Handle CPP_OSTRING.
+ (can_paste, maybe_paste_with_next): Handle pasting @ onto the
+ beginning of a NAME or a STRING, in objc mode.
+
+ * cpplib.c (get_define_node): Do not permit identifiers that
+ begin with @ to be #defined.
+ * cppmacro.c (CAN_PASTE_AFTER): Add CPP_OTHER.
+ * cpplib.h (TTYPE_TABLE): Add CPP_OSTRING.
+
+ * c-lang.c, objc/objc-act.c (build_objc_string): Delete.
+ * c-tree.h (build_objc_string): Delete prototype.
+ * objc/objc-tree.def: Delete OBJC_STRING_CST.
+ * c-lex.c (yylex): Use build_string for all three kinds of strings.
+
+ * c-parse.in, objc/objc-act.c: Update commentary.
+
2000-08-03 Mark Mitchell <mark@codesourcery.com>
* extend.texi: Fix typo in last change.
2000-08-03 Michael Poole <poole@troilus.org>
- * tm.texi (Register Classes): Clarify order of sub-initializers
- in REG_CLASS_CONTENTS.
+ * tm.texi (Register Classes): Clarify order of sub-initializers
+ in REG_CLASS_CONTENTS.
Thu Aug 3 15:53:03 2000 J"orn Rennecke <amylaar@cygnus.co.uk>
* cppmain.c (cb_define, cb_undef): Don't generate any output
if not done_initializing.
- * cpplex.c (maybe_paste_with_next): When the token after a ##
+ * cpplex.c (maybe_paste_with_next): When the token after a ##
is an omitted rest argument, only delete the token before it
if that token is a comma. Do not warn about bogus token
pastes for , ## rest_arg.
* config/i386/beos-elf.h (INCLUDE_DEFAULTS): Add additional
Be directories to search path.
-
+
Remove support for __declspec(dllimport) and __declspec(dllexport).
This is leftover cruft from the earlier BeOS gcc port when BeOS
used Microsoft's PE object file format.
(ASM_OUTPUT_ALIGNED_DECL_COMMON): Remove.
(ASM_OUTPUT_ALIGNED_LOCAL): Remove.
(STRIP_NAME_ENCODING): Remove.
-
+
Remove support for obsolete version of BeOS that is no longer
supported by Be.
* configure.in (i*86-*-beospe*): Remove.
* config/i386/beos-pe.h: Remove.
-
+
2000-08-01 Jeffrey Oldham <oldham@codesourcery.com>
- Mark Mitchell <mark@codesourcery.com>
-
+ Mark Mitchell <mark@codesourcery.com>
+
* Makefile.in (OBJS): Added dce.o.
(ssa.o): Updated target to include ssa.h.
(flow.o): Likewise.
* basic-block.h: Added comments.
(INVALID_BLOCK): Added definition.
(connect_infinite_loops_to_exit): Added declaration.
- Moved SSA declarations to ssa.h.
+ Moved SSA declarations to ssa.h.
* flow.c: Added inclusion of ssa.h.
(struct depth_first_search_dsS, depth_first_search_ds):
Added definitions.
Defined flag_ssa.
(f_options): Added dce entry.
* invoke.texi: Document -fdce. Emphasize experimental status of
- -fssa.
+ -fssa.
* dce: New file.
-
+
2000-08-01 Zack Weinberg <zack@wolery.cumb.org>
* cpperror.c (v_message): Split into _cpp_begin_message and
Sun Jul 30 20:25:21 MET DST 2000 Jan Hubicka <jh@suse.cz>
- * function.c (assign_stack_local_1, assign_stack_temp_for_type):
+ * function.c (assign_stack_local_1, assign_stack_temp_for_type):
Do not call gen_mode_alignment when mode is BLKmode.
Sun Jul 30 20:21:54 MET DST 2000 Jan Hubicka <jh@suse.cz>
(c4x_valid_type_attribute_p): Likewise.
* config/c4x/c4x.h (FUNCTION_PROLOGUE, FUNCTION_EPILOGUE): Delete.
(FUNCTION_BLOCK_PROFILER_EXIT): Convert to emit RTL.
-
+
2000-07-30 Michael Hayes <m.hayes@elec.canterbury.ac.nz>
* config/c4x/c4x.c (c4x_emit_move_sequence): Use loadqi_big_constant
* config/c4x/c4x.h (ASM_FORMAT_PRIVATE_NAME): Output $ in label.
2000-07-30 Michael Hayes <m.hayes@elec.canterbury.ac.nz>
-
+
* config/c4x/c4x.h (IS_XXX_REGNO): Rewrite to avoid unsigned warnings.
2000-07-30 Michael Hayes <m.hayes@elec.canterbury.ac.nz>
(make_equivalent_phi_alternatives_equivalent): Likewise.
(for_each_successor_phi): Likewise.
(convert_from_ssa): Modify phi-node deletion algorithm.
-
+
2000-07-29 Andreas Jaeger <aj@suse.de>
* configure.in (mips*-*-linux*): Use mips*el to check for little
(__do_global_ctors): Prototype.
* gcse.c (record_one_set, pre_delete): Remove unused variables.
-
+
* rs6000.c (rs6000_maybe_dead): Delete unused prototype.
(print_operand): Initialize variable `t'.
(--with-included-gettext): Likewise.
(--enable-maintainer-mode): New description added.
* extend.texi (-fstrict-prototype): Add missing '.'.
-
+
2000-07-27 Jim Wilson <wilson@cygnus.com>
* dwarf2out.c (gen_decl_die): Don't call gen_abstract_function if
* pa/x-pa-hpux: Add -D_HIUX_SOURCE to FIXPROTO_DEFINES
for HI-UX/WE2 systems.
-
+
2000-07-24 Bruce Korb <bkorb@gnu.org>
* fixincl/fixfixes.c(emit_gnu_type): rewrote to *rely* on GCC
* cpp.texi: Append a trailing full-stop to xrefs where needed.
-2000-07-26 Dave Pitts <dpitts@cozx.com>
+2000-07-26 Dave Pitts <dpitts@cozx.com>
- * i370.c: Remove LONGEXTERNAL ifdef from alias_number. Added hash
+ * i370.c: Remove LONGEXTERNAL ifdef from alias_number. Added hash
routine constants.
(mvs_hash_alias): New function.
(mvs_add_alias): Change argument spacing.
UNALIGNED_INT_ASM_OP.
(def_cfa_1): Don't emit def_cfa_register or def_cfa_offset to adjust
a location expression.
- (dwarf2out_frame_debug_expr): Lose cfa_old_reg stuff. Don't
+ (dwarf2out_frame_debug_expr): Lose cfa_old_reg stuff. Don't
assume indirect access if we're saving the CFA address exactly.
* Makefile.in (bootstrap): Move -BstageN/ to the end.
* c-semantics.c (make_rtl_for_local_static): Use TREE_ASM_WRITTEN
to figure out whether or not a variable has already been emitted.
-Sun Jul 23 14:49:12 2000 Jason Eckhardt <jle@cygnus.com>
+Sun Jul 23 14:49:12 2000 Jason Eckhardt <jle@cygnus.com>
- * config/i860/i860.md (untyped_call expander): Use GEN_CALL
+ * config/i860/i860.md (untyped_call expander): Use GEN_CALL
instead of gen_call.
Sun Jul 23 11:52:03 2000 George Helffrich (george@gly.bris.ac.uk)
return 0;
}
-tree
-build_objc_string (len, str)
- int len ATTRIBUTE_UNUSED;
- const char *str ATTRIBUTE_UNUSED;
-{
- abort ();
- return NULL_TREE;
-}
-
/* Used by c-typeck.c (build_external_ref), but only for objc. */
tree
/* We have read the entire constant.
Construct a STRING_CST for the result. */
+ yylval.ttype = build_string (p - (token_buffer + 1), token_buffer + 1);
if (wide_flag)
{
- yylval.ttype = build_string (p - (token_buffer + 1),
- token_buffer + 1);
TREE_TYPE (yylval.ttype) = wchar_array_type_node;
value = STRING;
}
else if (objc_flag)
{
- /* Return an Objective-C @"..." constant string object. */
- yylval.ttype = build_objc_string (p - (token_buffer + 1),
- token_buffer + 1);
TREE_TYPE (yylval.ttype) = char_array_type_node;
value = OBJC_STRING;
}
else
{
- yylval.ttype = build_string (p - (token_buffer + 1),
- token_buffer + 1);
TREE_TYPE (yylval.ttype) = char_array_type_node;
value = STRING;
}
%token CLASSNAME PUBLIC PRIVATE PROTECTED PROTOCOL OBJECTNAME CLASS ALIAS
/* Objective-C string constants in raw form.
- yylval is an OBJC_STRING_CST node. */
+ yylval is an STRING_CST node. */
%token OBJC_STRING
;
ifobjc
-/* Produces an OBJC_STRING_CST with perhaps more OBJC_STRING_CSTs chained
- onto it. */
+/* Produces an STRING_CST with perhaps more STRING_CSTs chained
+ onto it, which is to be read as an ObjC string object. */
objc_string:
OBJC_STRING
| objc_string OBJC_STRING
extern tree maybe_building_objc_message_expr PARAMS ((void));
extern tree maybe_objc_method_name PARAMS ((tree));
extern int recognize_objc_keyword PARAMS ((void));
-extern tree build_objc_string PARAMS ((int, const char *));
extern tree lookup_objc_ivar PARAMS ((tree));
\f
/* in c-parse.in */
}
len = cur - name;
- if (tok->val.node == 0)
+ if (tok->type == CPP_NAME && tok->val.node == 0)
tok->val.node = _cpp_lookup_with_hash (pfile, name, len, r);
else
{
- unsigned int oldlen = tok->val.node->length;
- U_CHAR *newname = alloca (oldlen + len);
- memcpy (newname, tok->val.node->name, oldlen);
+ unsigned int oldlen;
+ U_CHAR *newname;
+
+ if (tok->type == CPP_NAME)
+ oldlen = tok->val.node->length;
+ else
+ oldlen = 1;
+
+ newname = alloca (oldlen + len);
+
+ if (tok->type == CPP_NAME)
+ memcpy (newname, tok->val.node->name, oldlen);
+ else
+ newname[0] = tok->val.aux;
memcpy (newname + oldlen, name, len);
tok->val.node = cpp_lookup (pfile, newname, len + oldlen);
+ tok->type = CPP_NAME;
}
return cur;
case 'S': case 'T': case 'U': case 'V': case 'W': case 'X':
case 'Y': case 'Z':
cur--; /* Backup character. */
- cur_token->val.node = 0;
- cur_token->type = CPP_NAME; /* Identifier, macro etc. */
+
+ /* In Objective C, '@' may begin certain keywords. */
+ if (CPP_OPTION (pfile, objc) && cur_token[-1].type == CPP_OTHER
+ && cur_token[-1].val.aux == '@' && IMMED_TOKEN ())
+ cur_token--;
+ else
+ {
+ cur_token->val.node = 0;
+ cur_token->type = CPP_NAME; /* Identifier, macro etc. */
+ }
continue_name:
cur = parse_name (pfile, cur_token, cur, buffer->rlimit);
break;
case '\'':
+ cur_token->type = CPP_CHAR;
+ if (cur_token[-1].type == CPP_NAME && IMMED_TOKEN ()
+ && cur_token[-1].val.node == pfile->spec_nodes->n_L)
+ BACKUP_TOKEN (CPP_WCHAR);
+ goto do_parse_string;
+
case '\"':
- cur_token->type = c == '\'' ? CPP_CHAR : CPP_STRING;
- /* Do we have a wide string? */
+ cur_token->type = CPP_STRING;
if (cur_token[-1].type == CPP_NAME && IMMED_TOKEN ()
&& cur_token[-1].val.node == pfile->spec_nodes->n_L)
- BACKUP_TOKEN (c == '\'' ? CPP_WCHAR : CPP_WSTRING);
+ BACKUP_TOKEN (CPP_WSTRING);
+ else if (CPP_OPTION (pfile, objc)
+ && cur_token[-1].type == CPP_OTHER && IMMED_TOKEN ()
+ && cur_token[-1].val.aux == '@')
+ BACKUP_TOKEN (CPP_OSTRING);
do_parse_string:
/* Here c is one of ' " or >. */
case SPELL_STRING:
{
- if (token->type == CPP_WSTRING || token->type == CPP_WCHAR)
- putc ('L', fp);
-
- if (token->type == CPP_STRING || token->type == CPP_WSTRING)
- putc ('"', fp);
- if (token->type == CPP_CHAR || token->type == CPP_WCHAR)
- putc ('\'', fp);
-
+ int left, right, tag;
+ switch (token->type)
+ {
+ case CPP_STRING: left = '"'; right = '"'; tag = '\0'; break;
+ case CPP_WSTRING: left = '"'; right = '"'; tag = 'L'; break;
+ case CPP_OSTRING: left = '"'; right = '"'; tag = '@'; break;
+ case CPP_CHAR: left = '\''; right = '\''; tag = '\0'; break;
+ case CPP_WCHAR: left = '\''; right = '\''; tag = 'L'; break;
+ case CPP_HEADER_NAME: left = '<'; right = '>'; tag = '\0'; break;
+ default: left = '\0'; right = '\0'; tag = '\0'; break;
+ }
+ if (tag) putc (tag, fp);
+ if (left) putc (left, fp);
fwrite (token->val.str.text, 1, token->val.str.len, fp);
-
- if (token->type == CPP_STRING || token->type == CPP_WSTRING)
- putc ('"', fp);
- if (token->type == CPP_CHAR || token->type == CPP_WCHAR)
- putc ('\'', fp);
+ if (right) putc (right, fp);
}
break;
case SPELL_STRING:
{
- if (token->type == CPP_WSTRING || token->type == CPP_WCHAR)
- *buffer++ = 'L';
-
- if (token->type == CPP_STRING || token->type == CPP_WSTRING)
- *buffer++ = '"';
- if (token->type == CPP_CHAR || token->type == CPP_WCHAR)
- *buffer++ = '\'';
-
+ int left, right, tag;
+ switch (token->type)
+ {
+ case CPP_STRING: left = '"'; right = '"'; tag = '\0'; break;
+ case CPP_WSTRING: left = '"'; right = '"'; tag = 'L'; break;
+ case CPP_OSTRING: left = '"'; right = '"'; tag = '@'; break;
+ case CPP_CHAR: left = '\''; right = '\''; tag = '\0'; break;
+ case CPP_WCHAR: left = '\''; right = '\''; tag = 'L'; break;
+ case CPP_HEADER_NAME: left = '<'; right = '>'; tag = '\0'; break;
+ default: left = '\0'; right = '\0'; tag = '\0'; break;
+ }
+ if (tag) *buffer++ = tag;
+ if (left) *buffer++ = left;
memcpy (buffer, token->val.str.text, token->val.str.len);
buffer += token->val.str.len;
-
- if (token->type == CPP_STRING || token->type == CPP_WSTRING)
- *buffer++ = '"';
- if (token->type == CPP_CHAR || token->type == CPP_WCHAR)
- *buffer++ = '\'';
+ if (right) *buffer++ = right;
}
break;
return CPP_NUMBER;
break;
+ case CPP_OTHER:
+ if (CPP_OPTION (pfile, objc) && token1->val.aux == '@')
+ {
+ if (b == CPP_NAME) return CPP_NAME;
+ if (b == CPP_STRING) return CPP_OSTRING;
+ }
+
default:
break;
}
pasted->val.str.len = end - buf;
}
}
- else if (type == CPP_WCHAR || type == CPP_WSTRING)
+ else if (type == CPP_WCHAR || type == CPP_WSTRING
+ || type == CPP_OSTRING)
pasted = duplicate_token (pfile, second);
else
{
return 0;
}
+ /* In Objective C, some keywords begin with '@', but general identifiers
+ do not, and you're not allowed to #define them. */
+ if (token->val.node->name[0] == '@')
+ {
+ cpp_error_with_line (pfile, token->line, token->col,
+ "\"%s\" cannot be used as a macro name",
+ token->val.node->name);
+ return 0;
+ }
+
/* Check for poisoned identifiers now. */
if (token->val.node->type == T_POISON)
{
\
TK(CPP_STRING, SPELL_STRING) /* "string" */ \
TK(CPP_WSTRING, SPELL_STRING) /* L"string" */ \
+ TK(CPP_OSTRING, SPELL_STRING) /* @"string" - Objective C */ \
TK(CPP_HEADER_NAME, SPELL_STRING) /* <stdio.h> in #include */ \
\
TK(CPP_COMMENT, SPELL_STRING) /* Only if output comments. */ \
/* These are all the tokens that can have something pasted after them.
Comma is included in the list only to support the GNU varargs extension
- (where you write a ## b and a disappears if b is an empty rest argument). */
+ (where you write a ## b and a disappears if b is an empty rest argument).
+ CPP_OTHER is included because of Objective C's use of '@'. */
#define CAN_PASTE_AFTER(type) \
((type) <= CPP_LAST_EQ || (type) == CPP_COLON || (type) == CPP_HASH \
|| (type) == CPP_DEREF || (type) == CPP_DOT || (type) == CPP_NAME \
|| (type) == CPP_INT || (type) == CPP_FLOAT || (type) == CPP_NUMBER \
- || (type) == CPP_MACRO_ARG || (type) == CPP_PLACEMARKER || (type) == CPP_COMMA)
+ || (type) == CPP_MACRO_ARG || (type) == CPP_PLACEMARKER \
+ || (type) == CPP_COMMA || (type) == CPP_OTHER)
/* Scans for a given token, returning the parameter number if found,
or 0 if not found. Scans from FIRST to TOKEN - 1 or the first
return a_string;
}
-/* Return a newly constructed OBJC_STRING_CST node whose value is
- the LEN characters at STR.
- The TREE_TYPE is not initialized. */
-
-tree
-build_objc_string (len, str)
- int len;
- const char *str;
-{
- tree s = build_string (len, str);
-
- TREE_SET_CODE (s, OBJC_STRING_CST);
- return s;
-}
-
-/* Given a chain of OBJC_STRING_CST's, build a static instance of
+/* Given a chain of STRING_CST's, build a static instance of
NXConstanString which points at the concatenation of those strings.
We place the string object in the __string_objects section of the
__OBJC segment. The Objective-C runtime will initialize the isa
add_class_reference (constant_string_id);
- /* Combine_strings will work for OBJC_STRING_CST's too. */
string = combine_strings (strings);
TREE_SET_CODE (string, STRING_CST);
length = TREE_STRING_LENGTH (string) - 1;
DEFTREECODE (KEYWORD_DECL, "keyword_decl", 'd', 0)
DEFTREECODE (INSTANCE_METHOD_DECL, "instance_method_decl", 'd', 0)
DEFTREECODE (CLASS_METHOD_DECL, "class_method_decl", 'd', 0)
-
-/* Objective-C constants. */
-DEFTREECODE (OBJC_STRING_CST, "objc_string_cst", 'c', 3)
+2000-08-03 Zack Weinberg <zack@wolery.cumb.org>
+
+ * gcc.dg/cpp/20000625-2.c: Don't expect a warning on line 4.
+
Thu Aug 3 01:46:33 2000 Jeffrey A Law (law@cygnus.com)
* gcc.c-torture/compile/20000803-1.c: New test.
/* { dg-do run } */
#define symbol_version(name, version) name##@##version
-/* { dg-warning "nothing can be pasted" "" { target *-*-* } 4 } */
#define str(x) xstr(x)
#define xstr(x) #x
projects / gcc.git / commitdiff