Thu Feb 13 14:48:03 1997 Philippe De Muyter <phdm@info.ucl.ac.be>

	* config/tc-m68k.c (LEX_TILDE): Define if TE_DELTA.
	* read.c (LEX_TILDE): Define if not defined.
	(lex_type): Use LEX_TILDE.
	* expr.c (get_symbol_end): Check first char with is_name_beginner,
	not is_part_of_name.

diff --git a/gas/ChangeLog b/gas/ChangeLog
index 3994c46c65e51ca6fc8872bcaeb70e81b0e8d447..d9932d25a5aac111f20471c4c5b4e5e58835373c 100644 (file)
--- a/gas/ChangeLog
+++ b/gas/ChangeLog
@@ -1,3 +1,11 @@
+Thu Feb 13 14:48:03 1997  Philippe De Muyter  <phdm@info.ucl.ac.be>
+
+       * config/tc-m68k.c (LEX_TILDE): Define if TE_DELTA.
+       * read.c (LEX_TILDE): Define if not defined.
+       (lex_type): Use LEX_TILDE.
+       * expr.c (get_symbol_end): Check first char with is_name_beginner,
+       not is_part_of_name.
+
 Thu Feb 13 11:40:58 1997  Ian Lance Taylor  <ian@cygnus.com>
 
        * config/tc-mips.c (mips16_extended_frag): Correct base address

diff --git a/gas/read.c b/gas/read.c
index 5e7042936acb99f077a94593b3b03a9d3c0d4a0c..990de7c2a23fd9c9514de2274e1814f289119fb4 100644 (file)
--- a/gas/read.c
+++ b/gas/read.c
@@ -96,6 +96,11 @@ die horribly;
 #define LEX_DOLLAR 3
 #endif
 
+#ifndef LEX_TILDE
+/* The Delta 68k assembler permits ~ at start of label names.  */
+#define LEX_TILDE 0
+#endif
+
 /* used by is_... macros. our ctype[] */
 char lex_type[256] =
 {
@@ -106,7 +111,7 @@ char lex_type[256] =
   LEX_AT, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, /* @ABCDEFGHIJKLMNO */
   3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, LEX_BR, 0, LEX_BR, 0, 3, /* PQRSTUVWXYZ[\]^_ */
   0, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3,      /* `abcdefghijklmno */
-  3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, LEX_BR, 0, LEX_BR, 0, 0, /* pqrstuvwxyz{|}~. */
+  3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, LEX_BR, 0, LEX_BR, LEX_TILDE, 0, /* pqrstuvwxyz{|}~. */
   0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
   0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
   0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,