Procedure GMCR;
   EXTERNAL;
{*USER*
Pascal-3 procedure to load the command line, that was supplied
at run time, into the first line of INPUT so that the user can
do a simple READLN to get the command.  The user must call
GMCR before the first READLN.  See the Pascal-2.1 manual for
more details (page 2-62 Oct 86 edition).
}