* app.c (do_scrub_begin): allow single quote strings if so

configured.
This commit is contained in:
Steve Chamberlain 1992-12-15 22:55:01 +00:00
parent 2cb0bdc75b
commit be06bdcdd7
2 changed files with 19 additions and 4 deletions

View File

@ -1,3 +1,14 @@
Tue Dec 15 12:40:11 1992 Steve Chamberlain (sac@thepub.cygnus.com)
* app.c (do_scrub_begin): allow single quote strings if so
configured.
* config/*z8k*: checkpoint
Sun Dec 13 00:04:38 1992 Ian Lance Taylor (ian@cygnus.com)
* read.c (read_a_source_file): avoid calling xmalloc (0).
Sat Dec 12 15:26:34 1992 Ian Lance Taylor (ian@cygnus.com) Sat Dec 12 15:26:34 1992 Ian Lance Taylor (ian@cygnus.com)
* listing.c: Call xmalloc, not malloc; don't declare malloc. * listing.c: Call xmalloc, not malloc; don't declare malloc.

View File

@ -23,8 +23,8 @@
/* App, the assembler pre-processor. This pre-processor strips out excess /* App, the assembler pre-processor. This pre-processor strips out excess
spaces, turns single-quoted characters into a decimal constant, and turns spaces, turns single-quoted characters into a decimal constant, and turns
# <number> <filename> <garbage> into a .line <number>\n.app-file <filename> pair. # <number> <filename> <garbage> into a .line <number>\n.app-file <filename>
This needs better error-handling. pair. This needs better error-handling.
*/ */
#include <stdio.h> #include <stdio.h>
@ -74,10 +74,14 @@ do_scrub_begin ()
lex['\''] = LEX_IS_ONECHAR_QUOTE; lex['\''] = LEX_IS_ONECHAR_QUOTE;
lex[':'] = LEX_IS_COLON; lex[':'] = LEX_IS_COLON;
#ifdef MRI
lex['\''] = LEX_IS_STRINGQUOTE;
#ifdef SINGLE_QUOTE_STRINGS
lex['\''] = LEX_IS_STRINGQUOTE;
#endif #endif
/* Note that these override the previous defaults, e.g. if ';' /* Note that these override the previous defaults, e.g. if ';'
is a comment char, then it isn't a line separator. */ is a comment char, then it isn't a line separator. */
for (p = symbol_chars; *p; ++p) for (p = symbol_chars; *p; ++p)
{ {