gdb/gdb/language.c

1 /* Multiple source language support for GDB.
31    return data out of a "language-specific" struct pointer that is set
32    whenever the working language changes.  That would be a lot faster.  */
43 #include "language.h"
111    on the default language at startup, and then again based on the
112    language of the first source file.  */
121 /* The current language and language_mode (see language.h) */
126 /* The language that the user expects to be typing in (the language
127    of main(), or the last language we notified them about, or C).  */
138 /* The "set language/type/range" commands all put stuff in these
144 static char *language;
149 /* Warning issued when current_language and the language of the current
152 "Warning: the current language does not match this frame.";
158 /* Show command.  Display a warning if the language set
163   enum language flang;		/* The language of the current frame */
172 /* Set command.  Change the current working language. */
177   enum language flang;
180   if (!language || !language[0])
194 	  printf_unfiltered ("%-16s Use the %c%s language\n",
196 	  /* Capitalize first letter of language
209       if (strcmp (languages[i]->la_name, language) == 0)
211 	  /* Found it!  Go into manual mode, and use this language.  */
214 	      /* Enter auto mode.  Set to the current frame's language, if known.  */
224 	      /* Enter manual mode.  Set the specified language.  */
235   /* Reset the language (esp. the global string "language") to the
237   err_lang = savestring (language, strlen (language));
240   error ("Unknown language `%s'.", err_lang);
244    not match the current language. */
250 			"Warning: the current type check setting does not match the language.\n");
289    not match the current language. */
296 			"Warning: the current range check setting does not match the language.\n");
335    not match the current language. */
341 "Warning: the current case sensitivity setting does not match the language.\n");
375    the current modes and the current language.
376    If SHOW is non-zero, then print out the current language,
396 /* Set current language to (enum language) LANG.  Returns previous language. */
398 enum language
399 set_language (enum language lang)
402   enum language prev_language;
422    language, type and range. */
428   if (language)
429     xfree (language);
433   language = concat (prefix, current_language->la_name, NULL);
516 /* Print out the current language settings: language, range and
526   printf_unfiltered ("Current language:  %s\n", language);
721    Note that some of them are not currently dependent upon which language
989      not depend on the language except insofar as is necessary to identify
1000 /* These are called when a language fails a type- or range-check.  The
1063 /* Return the language enum for a given language string. */
1065 enum language
1077 /* Return the language struct for a given language enum. */
1080 language_def (enum language lang)
1094 /* Return the language as a string */
1096 language_str (enum language lang)
1125 /* Add a language to the set of known languages.  */
1132       fprintf_unfiltered (gdb_stderr, "Magic number of %s language struct wrong\n",
1174 /* Return demangled language symbol, or NULL.
1179    language, so we can't use this everywhere.  */
1199 /* Define the language that is no language.  */
1210   error ("Attempted to parse an expression with unknown language");
1388 /* Initialize the language routines */
1395   /* GDB commands for language specific stuff */
1397   set = add_set_cmd ("language", class_support, var_string_noescape,
1398 		     (char *) &language,
1399 		     "Set the current source language.",
1446   language = savestring ("auto", strlen ("auto"));