home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / spezial / 20 / st_txl / intglob.c < prev    next >
Encoding:
C/C++ Source or Header  |  1985-07-18  |  1.7 KB  |  56 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.     { ctrcon,   "verfolge"  ,   0,          0},
  28.     { ctrcoff,  "folgenicht",   0,          0},
  29.     { cwdog,    "wachhund"  ,   0,          0},
  30.     { creadvar, "lese"      ,   1,          1},
  31.     { ccopy,    "kopiere"   ,   3,          1},
  32.     { cins,     "einfuegen" ,   3,          1},
  33.     { cdel,     "loesche"   ,   3,          1},
  34.     { ccommands,"commands"  ,   0,          0}, 
  35.     { NULL,        NULL        ,    0,            0}
  36. };
  37.  
  38. /* Globale Variable des Interpreters */
  39. int            IntError;        /* Interpreterfehler ist aufgetreten. */
  40.  
  41. PRGZEILE    *FirstLine;        /* erste Interpreterzeile */
  42. PRGZEILE    *LastLine;        /* letzte Interpreterzeile */
  43. PRGZEILE    *ActLine;        /* aktuelle interpretierte Zeile */
  44. char        *LinePos;        /* Zeilenposition der aktuellen Zeile*/
  45.  
  46. int            Steuer;            /* Scanner-Ergebnis */
  47. char        ScanBuffer[ZEILENLAENGE]; /* Ergebnis des Scanners */
  48.  
  49. VAR        *FirstVar = NULL;    /* Zeiger auf die erste Variable */
  50.  
  51. char    FileName[FNAMLEN];    /* Zwischenspeicher für den Filenamen */
  52.  
  53. int traceFlag;              /* Trace On/Off */
  54.  
  55. /* Ende des Files INTGLOB.C */
  56.