home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / 1990 / 10 / int / source / intglob.c < prev    next >
Encoding:
C/C++ Source or Header  |  1990-06-19  |  1.3 KB  |  46 lines
  1. /* intglob.c
  2. Dieses File enthält alle Globalvariablen des Interpreters.
  3. (c) 1990 Michael Beising & TOOLBOX
  4. */
  5.  
  6. #include    <stdio.h>
  7. #include    <stdlib.h>
  8. #include    "interp.h"
  9.  
  10.  
  11. /*    Initialisieren der Befehlsvergleichsliste */
  12.  
  13. TOKBEF    TokBefDesc[] = {
  14. /*    Funktion  Bef.-Name     Para-Count        CopyRest */
  15.     { crun,        "lauf"        ,    0,            0},
  16.     { cdruck,    "drucke"    ,    0,            1},
  17.     { cset,        "setze"        ,    3,            1},
  18.     { cif,        "wenn"        ,    2,            1},
  19.     { cload,    "lade"        ,    1,            1},
  20.     { csave,    "speichere"    ,    1,            1},
  21.     { cgoto,    "gehezu"    ,    1,            0},
  22.     { cende,    "ende"        ,    0,            0},
  23.     { cexit,    "verlasse"    ,    0,            0},
  24.     { cmerke,    "merke"        ,   0,          1},
  25.     { clist,    "liste"    ,   0,          1},
  26.     { cneu,        "neu"        ,   0,          0},
  27.     { NULL,        NULL        ,    0,            0}
  28. };
  29.  
  30. /* Globale Variable des Interpreters */
  31. int            IntError;        /* Interpreterfehler ist aufgetreten. */
  32.  
  33. PRGZEILE    *FirstLine;        /* erste Interpreterzeile */
  34. PRGZEILE    *LastLine;        /* letzte Interpreterzeile */
  35. PRGZEILE    *ActLine;        /* aktuelle interpretierte Zeile */
  36. char        *LinePos;        /* Zeilenposition der aktuellen Zeile*/
  37.  
  38. int            Steuer;            /* Scanner-Ergebnis */
  39. char        ScanBuffer[ZEILENLAENGE]; /* Ergebnis des Scanners */
  40.  
  41. VAR        *FirstVar = NULL;    /* Zeiger auf die erste Variable */
  42.  
  43. char    FileName[FNAMLEN];    /* Zwischenspeicher für den Filenamen */
  44.  
  45. /* Ende des Files INTGLOB.C */
  46.