src/globals.c

   1 /*
   2 ** Splint - annotation-assisted static program checker
   3 ** Copyright (C) 1994-2002 University of Virginia,
   4 **         Massachusetts Institute of Technology
   5 **
   6 ** This program is free software; you can redistribute it and/or modify it
   7 ** under the terms of the GNU General Public License as published by the
   8 ** Free Software Foundation; either version 2 of the License, or (at your
   9 ** option) any later version.
  10 **
  11 ** This program is distributed in the hope that it will be useful, but
  12 ** WITHOUT ANY WARRANTY; without even the implied warranty of
  13 ** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14 ** General Public License for more details.
  15 **
  16 ** The GNU General Public License is available from http://www.gnu.org/ or
  17 ** the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
  18 ** MA 02111-1307, USA.
  19 **
  20 ** For information on splint: info@splint.org
  21 ** To report a bug: splint-bug@splint.org
  22 ** For more information: http://www.splint.org
  23 */
  24 /*
  25 ** globals.c
  26 */
  27
  28 # include "splintMacros.nf"
  29 # include "basic.h"
  30
  31 fileloc g_currentloc;
  32
  33 symtable g_symtab;
  34 /*@only@*/ lsymbolSet g_currentImports = lsymbolSet_undefined;
  35
  36 cstring g_codeFile = cstring_undefined;
  37 int g_codeLine = 0;
  38
  39 cstring g_prevCodeFile = cstring_undefined;
  40 int g_prevCodeLine = 0;
  41
  42 /*
  43 ** These are initialized in llmain.c.
  44 */
  45
  46 FILE *g_warningstream = NULL;
  47 FILE *g_messagestream = NULL;
  48 FILE *g_errorstream = NULL;
  49
  50 /*
  51 ** These were in llmain.c.  Most should not be globals...
  52 */
  53
  54 /*@observer@*/ char *g_localSpecPath = ".";
  55
  56 /*@only@*/ cstring g_currentSpec;
  57 /*@only@*/ char *g_currentSpecName;
  58
  59 void printCodePoint (void)
  60 {
  61   static bool incode = FALSE;
  62
  63   if (incode) {
  64     fprintf (stderr, "[[[ in code! ]]]\n");
  65   }
  66
  67   incode = TRUE;
  68
  69   if (cstring_isDefined (g_codeFile))
  70     {
  71       cstring temps = fileloc_unparseRaw (g_codeFile, g_codeLine);
  72
  73       fprintf (stderr, "*** Last code point: %s\n",
  74                cstring_toCharsSafe (temps));
  75
  76       cstring_free (temps);
  77
  78       if (cstring_isDefined (g_prevCodeFile))
  79         {
  80           temps = fileloc_unparseRaw (g_prevCodeFile, g_prevCodeLine);
  81           fprintf (stderr, "*** Previous code point: %s\n",
  82                    cstring_toCharsSafe (temps));
  83
  84           cstring_free (temps);
  85         }
  86     }
  87
  88   incode = FALSE;
  89 }
  90
  91 # ifdef WIN32
  92 int yywrap (void)
  93 {
  94   return 1;
  95 }
  96 # endif
  97
  98
  99