aboutsummaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
authorTom Wood <wood@gnu.org>1992-07-01 13:15:03 +0000
committerTom Wood <wood@gnu.org>1992-07-01 13:15:03 +0000
commitb9d35b4069998477557320f8dad47b0bed66cffa (patch)
tree4f517fa9c1749a5dd81b3b543676a46719defe7c /gcc
parentf88a74911f7a002ce8fea763783a7b2f3e7b9ff0 (diff)
downloadgcc-b9d35b4069998477557320f8dad47b0bed66cffa.zip
gcc-b9d35b4069998477557320f8dad47b0bed66cffa.tar.gz
gcc-b9d35b4069998477557320f8dad47b0bed66cffa.tar.bz2
(m88k_handle_pragma_token): Deleted.
From-SVN: r1372
Diffstat (limited to 'gcc')
-rw-r--r--gcc/config/m88k/m88k.c93
1 files changed, 0 insertions, 93 deletions
diff --git a/gcc/config/m88k/m88k.c b/gcc/config/m88k/m88k.c
index 9984464..a61d688 100644
--- a/gcc/config/m88k/m88k.c
+++ b/gcc/config/m88k/m88k.c
@@ -1452,99 +1452,6 @@ output_label (label_number)
{
ASM_OUTPUT_INTERNAL_LABEL (asm_out_file, "L", label_number);
}
-
-/* Handle a pragma directive. HANDLE_PRAGMA conspires to parse the input
- following #pragma into tokens based on yylex. */
-
-void
-m88k_handle_pragma_token (string, token)
- char *string;
- tree token;
-{
- static enum pragma_state
- {
- ps_start,
- ps_done,
- ps_bad,
- ps_weak,
- ps_name,
- ps_equals,
- ps_value
- } state;
- static char *name;
- static char *value;
-
- if (HANDLE_PRAGMA_WEAK)
- {
- if (string == 0)
- {
- if (state == ps_name || state == ps_value)
- {
- fprintf (asm_out_file, "\t%s\t ", WEAK_ASM_OP);
- ASM_OUTPUT_LABELREF (asm_out_file, name);
- fputc ('\n', asm_out_file);
- if (state == ps_value)
- {
- fprintf (asm_out_file, "\t%s\t ", SET_ASM_OP);
- ASM_OUTPUT_LABELREF (asm_out_file, name);
- fputc (',', asm_out_file);
- ASM_OUTPUT_LABELREF (asm_out_file, value);
- fputc ('\n', asm_out_file);
- }
- }
- else if (! (state == ps_done || state == ps_start))
- warning ("ignoring malformed #pragma weak symbol [=value]");
- state = ps_start;
- }
- else
- switch (state)
- {
- case ps_start:
- if (token
- && TREE_CODE (token) == IDENTIFIER_NODE
- && !strcmp (IDENTIFIER_POINTER (token), "weak"))
- state = ps_weak;
- else
- state = ps_done;
- break;
-
- case ps_weak:
- if (token
- && TREE_CODE (token) == IDENTIFIER_NODE)
- {
- name = IDENTIFIER_POINTER (token);
- state = ps_name;
- }
- else
- state = ps_bad;
- break;
-
- case ps_name:
- state = (strcmp (string, "=") ? ps_bad : ps_equals);
- break;
-
- case ps_equals:
- if (token
- && TREE_CODE (token) == IDENTIFIER_NODE)
- {
- value = IDENTIFIER_POINTER (token);
- state = ps_value;
- }
- else
- state = ps_bad;
- break;
-
- case ps_value:
- state = ps_bad;
- case ps_bad:
- case ps_done:
- break;
-
- default:
- abort ();
- }
- }
-}
/* Generate the assembly code for function entry.