]> gcc.gnu.org Git - gcc.git/commitdiff
(handle_pragma_token): Delete.
authorJim Wilson <wilson@gcc.gnu.org>
Wed, 2 Sep 1992 17:45:35 +0000 (10:45 -0700)
committerJim Wilson <wilson@gcc.gnu.org>
Wed, 2 Sep 1992 17:45:35 +0000 (10:45 -0700)
From-SVN: r2034

gcc/config/sparc/sparc.c

index 370c5fbe126155bd2d064f1bd931dbebea4c61a7..cfd50648f0d2d0dd6ba292b27ffde374976d97fb 100644 (file)
@@ -3031,115 +3031,6 @@ sparc_type_code (type)
     }
 }
 \f
-#if defined(HANDLE_PRAGMA) && !defined(HANDLE_SYSV_PRAGMA)
-
-/* Handle a pragma directive.  HANDLE_PRAGMA conspires to parse the
-   input following #pragma into tokens based on yylex.  TOKEN is the
-   current token, and STRING is its printable form.  */
-
-void
-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 = ps_start, type;
-  static char *name;
-  static char *value;
-  static int align;
-
-  if (string == 0)
-    {
-#ifdef WEAK_ASM_OP
-      if (type == ps_weak)
-       {
-         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)
-               {
-                 fputc ('\t', asm_out_file);
-                 ASM_OUTPUT_LABELREF (asm_out_file, name);
-                 fputs (" = ", 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]");
-       }
-#endif /* WEAK_ASM_OP */
-
-      type = state = ps_start;
-      return;
-    }
-
-  switch (state)
-    {
-    case ps_start:
-      if (token && TREE_CODE (token) == IDENTIFIER_NODE)
-       {
-#ifdef WEAK_ASM_OP
-         if (strcmp (IDENTIFIER_POINTER (token), "weak") == 0)
-           type = state = ps_weak;
-         else
-#endif
-           type = state = ps_done;
-       }
-      else
-       type = state = ps_done;
-      break;
-
-#ifdef WEAK_ASM_OP
-    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;
-      break;
-#endif /* WEAK_ASM_OP */
-
-    case ps_bad:
-    case ps_done:
-      break;
-
-    default:
-      abort ();
-    }
-}
-#endif /* HANDLE_PRAGMA && not HANDLE_SYSV_PRAGMA */
-\f
 /* Subroutines to support a flat (single) register window calling
    convention.  */
 
This page took 0.065555 seconds and 5 git commands to generate.