home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Frozen Fish 1: Amiga
/
FrozenFish-Apr94.iso
/
bbs
/
mar94
/
util
/
misc
/
kalender.lha
/
Kalender
/
txt
/
Commands.def
< prev
next >
Wrap
Text File
|
1993-12-18
|
903b
|
33 lines
DEFINITION MODULE Commands; (* Copyright 1993 by Kai Hofmann *)
(*$ StackChk := FALSE *)
(*$ RangeChk := FALSE *)
(*$ OverflowChk := FALSE *)
(*$ NilChk := FALSE *)
(*$ CaseChk := FALSE *)
(*$ ReturnChk := FALSE *)
(*$ LargeVars := FALSE *)
(*$ EntryClear := TRUE *)
(*$ Volatile := TRUE *)
(*$ StackParms := TRUE *)
(*$ CStrings := TRUE *)
TYPE
string = ARRAY [1..80] OF CHAR;
strptr = POINTER TO string;
PROCEDURE CheckOption (option : string) : BOOLEAN;
(* Guckt, ob die option in der Commandline vorkommt *)
PROCEDURE GetOptionParam (option : string; VAR quotes : BOOLEAN) : strptr;
(* Holt den Parameter der option *)
PROCEDURE Killstr (param : strptr);
(* Löscht den Rückgabestring *)
PROCEDURE AnzArg() : INTEGER;
(* Hollt Anzahl der Argumente der Commandline *)
END Commands.