OSDN Git Service

New builtins: __REGISTER_PREFIX__ and __USER_LABEL_PREFIX__
authorian <ian@138bc75d-0d04-0410-961f-82ee72b054a4>
Sat, 27 Feb 1993 06:09:33 +0000 (06:09 +0000)
committerian <ian@138bc75d-0d04-0410-961f-82ee72b054a4>
Sat, 27 Feb 1993 06:09:33 +0000 (06:09 +0000)
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@3552 138bc75d-0d04-0410-961f-82ee72b054a4

gcc/cccp.c

index 5e0d2f8..9f75cc0 100644 (file)
@@ -738,6 +738,8 @@ enum node_type {
  T_SIZE_TYPE,   /* `__SIZE_TYPE__' */
  T_PTRDIFF_TYPE,   /* `__PTRDIFF_TYPE__' */
  T_WCHAR_TYPE,   /* `__WCHAR_TYPE__' */
+ T_USER_LABEL_PREFIX_TYPE, /* `__USER_LABEL_PREFIX__' */
+ T_REGISTER_PREFIX_TYPE,   /* `__REGISTER_PREFIX__' */
  T_TIME,       /* `__TIME__' */
  T_CONST,      /* Constant value, used by `__STDC__' */
  T_MACRO,      /* macro defined by `#define' */
@@ -804,6 +806,18 @@ static char *predefs = "";
 #ifndef WCHAR_TYPE
 #define WCHAR_TYPE "int"
 #endif
+
+/* The string value for __USER_LABEL_PREFIX__ */
+
+#ifndef USER_LABEL_PREFIX
+#define USER_LABEL_PREFIX ""
+#endif
+
+/* The string value for __REGISTER_PREFIX__ */
+
+#ifndef REGISTER_PREFIX
+#define REGISTER_PREFIX ""
+#endif
 \f
 /* In the definition of a #assert name, this structure forms
    a list of the individual values asserted.
@@ -3622,6 +3636,16 @@ special_symbol (hp, op)
     sprintf (buf, "%s", WCHAR_TYPE);
     break;
 
+  case T_USER_LABEL_PREFIX_TYPE:
+    buf = (char *) alloca (3 + strlen (USER_LABEL_PREFIX));
+    sprintf (buf, "%s", USER_LABEL_PREFIX);
+    break;
+
+  case T_REGISTER_PREFIX_TYPE:
+    buf = (char *) alloca (3 + strlen (REGISTER_PREFIX));
+    sprintf (buf, "%s", REGISTER_PREFIX);
+    break;
+
   case T_CONST:
     buf = (char *) alloca (4 * sizeof (int));
     sprintf (buf, "%d", hp->value.ival);
@@ -8380,6 +8404,8 @@ initialize_builtins (inp, outp)
   install ("__PTRDIFF_TYPE__ ", -1, T_PTRDIFF_TYPE, 0, 0, -1);
 #endif
   install ("__WCHAR_TYPE__", -1, T_WCHAR_TYPE, 0, 0, -1);
+  install ("__USER_LABEL_PREFIX__", -1, T_USER_LABEL_PREFIX_TYPE, 0, 0, -1);
+  install ("__REGISTER_PREFIX__", -1, T_REGISTER_PREFIX_TYPE, 0, 0, -1);
   install ("__TIME__", -1, T_TIME, 0, 0, -1);
   if (!traditional)
     install ("__STDC__", -1, T_CONST, STDC_VALUE, 0, -1);