Copyright (C) 1994, Digital Equipment Corp. UNSAFE MODULE; IMPORT RTArgs; EXCEPTION FatalError; <* FATAL FatalError *> PROCEDURE Params Get (n: CARDINAL): TEXT = BEGIN IF n >= Count THEN RAISE FatalError END; RETURN RTArgs.GetArg(n); END Get; BEGIN Count := RTArgs.ArgC(); END Params.