gcl-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Gcl-devel] More things that need to be cleaned up (LARGE)


From: Robert Alan Byer
Subject: [Gcl-devel] More things that need to be cleaned up (LARGE)
Date: Thu, 20 Dec 2001 13:47:10 -0500

-----BEGIN PGP SIGNED MESSAGE-----


Well..

I did some more work on the OpenVMS port of GCL to try to catch it up to 
where I am with the Tru64 port and I'm almost at the same spot.

Attached is a log of the OpenVMS build with warnings.  Besides what I've 
suggested for the GMP library, there are a TON of "implicitly declared
functions" in the gcl/o files that should really be taken care of to
make the code more ANSI C compliant.

(the OpenVMS build is extremely rough and is just so I can get an idea
of what needs to be fixed as I know I'm compiling stuff I really don't
need to)

===========================================================================

$ @BUILD_GCL

Runtime Debugger Won't Be Included At Link.

Building With GMP Support.
Compiling On A AXP Machine.
Creating SYS$DISK:[-.H]GCLINCL.H
Creating SYS$DISK:[-.H]CMPINCLUDE.H
Creating SYS$DISK:[-.O]CMPINCLUDE.H
Creating SYS$DISK:[-.H]CONFIG.H

Compling The [.BIN] Utilities.
Creating SYS$DISK:[.BIN]
Using Compile Command: 
CC/PREFIX=ALL/OPTIMIZE=(LEVEL=5,TUNE=HOST)/ARCH=HOST/NODEBUG/REENTRANCY=MULTITHREAD/FLOAT=IEEE_FLOAT/IEEE_MODE=DENORM_RESULTS/NEST=PRIMARY/NAME=(AS_IS,SHORTENED)/INCLUDE=(SYS$DISK:[-.O])/DEFINE=("UNIX=1","VOL=")

        SYS$DISK:[-.BIN]APPEND.C
        SYS$DISK:[-.BIN]DPP.C
        SYS$DISK:[-.BIN]FILE-SUB.C

Compling The GNU GMP Library.
Creating SYS$DISK:[.LIB]
Copying SYS$DISK:[-.GMP]CONFIG_H.VMS To SYS$DISK:[-.GMP]CONFIG.H
Using Compile Command: 
CC/PREFIX=ALL/OPTIMIZE=(LEVEL=5,TUNE=HOST)/ARCH=HOST/NODEBUG/REENTRANCY=MULTITHREAD/FLOAT=IEEE_FLOAT/IEEE_MODE=DENORM_RESULTS/NEST=PRIMARY/NAME=(AS_IS,SHORTENED)/INCLUDE=(SYS$DISK:[-.GMP],SYS$DISK:[-.GMP.MPN],SYS$DISK:[-.GMP.MPN.GEN

        SYS$DISK:[-.GMP]ASSERT.C

  abort();
..^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 48 in file DISK$WORK:[TEST.GCL.GMP]ASSERT.C;1
        SYS$DISK:[-.GMP]COMPAT.C

int
^
%CC-W-MISSINGRETURN, Non-void function "__gmpn_divexact_by3" does not contain a 
return statement.
at line number 31 in file DISK$WORK:[TEST.GCL.GMP]COMPAT.C;1

int
^
%CC-W-MISSINGRETURN, Non-void function "__gmpn_divmod_1" does not contain a 
return statement.
at line number 40 in file DISK$WORK:[TEST.GCL.GMP]COMPAT.C;1
%LIBRAR-W-COMCOD, compilation warnings in module COMPAT file 
DISK$WORK:[TEST.GCL.GMP]COMPAT-AXP.OBJ;1
        SYS$DISK:[-.GMP]ERRNO.C
        SYS$DISK:[-.GMP]EXTRACT-DBL.C
        SYS$DISK:[-.GMP]INSERT-DBL.C
        SYS$DISK:[-.GMP]MEMORY.C
        SYS$DISK:[-.GMP]MP_BPL.C
        SYS$DISK:[-.GMP]MP_CLZ_TAB.C
        SYS$DISK:[-.GMP]MP_MINV_TAB.C
        SYS$DISK:[-.GMP]MP_SET_FNS.C
        SYS$DISK:[-.GMP]RAND.C
        SYS$DISK:[-.GMP]RANDCLR.C
        SYS$DISK:[-.GMP]RANDLC.C

  abort ();                     
..^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 42 in file DISK$WORK:[TEST.GCL.GMP]RANDLC.C;1
        SYS$DISK:[-.GMP]RANDLC2X.C
        SYS$DISK:[-.GMP]RANDRAW.C

          abort ();             /* FIXME.  */
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 159 in file DISK$WORK:[TEST.GCL.GMP]RANDRAW.C;1

      abort ();                 /* FIXME.  */
......^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 201 in file DISK$WORK:[TEST.GCL.GMP]RANDRAW.C;1
        SYS$DISK:[-.GMP]RANDSD.C
        SYS$DISK:[-.GMP]RANDSDUI.C
        SYS$DISK:[-.GMP]STACK-ALLOC.C
        SYS$DISK:[-.GMP]VERSION.C
        SYS$DISK:[-.GMP.MPN]MP_BASES.C
        SYS$DISK:[-.GMP.MPN.GENERIC]ADDMUL_1.C
        SYS$DISK:[-.GMP.MPN.GENERIC]ADDSUB_N.C
        SYS$DISK:[-.GMP.MPN.GENERIC]ADD_N.C
        SYS$DISK:[-.GMP.MPN.GENERIC]BDIVMOD.C
        SYS$DISK:[-.GMP.MPN.GENERIC]BZ_DIVREM_N.C
        SYS$DISK:[-.GMP.MPN.GENERIC]CMP.C
        SYS$DISK:[-.GMP.MPN.GENERIC]DIVEBY3.C
        SYS$DISK:[-.GMP.MPN.GENERIC]DIVREM.C
        SYS$DISK:[-.GMP.MPN.GENERIC]DIVREM_1.C
        SYS$DISK:[-.GMP.MPN.GENERIC]DIVREM_2.C
        SYS$DISK:[-.GMP.MPN.GENERIC]DUMP.C
        SYS$DISK:[-.GMP.MPN.GENERIC]GCD.C
        SYS$DISK:[-.GMP.MPN.GENERIC]GCDEXT.C

                      abort ();
......................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 463 in file DISK$WORK:[TEST.GCL.GMP.MPN.GENERIC]GCDEXT.C;1
        SYS$DISK:[-.GMP.MPN.GENERIC]GCD_1.C
        SYS$DISK:[-.GMP.MPN.GENERIC]GET_STR.C
        SYS$DISK:[-.GMP.MPN.GENERIC]HAMDIST.C
        SYS$DISK:[-.GMP.MPN.GENERIC]INLINES.C
        SYS$DISK:[-.GMP.MPN.GENERIC]JACBASE.C
        SYS$DISK:[-.GMP.MPN.GENERIC]LSHIFT.C
        SYS$DISK:[-.GMP.MPN.GENERIC]MOD_1.C
        SYS$DISK:[-.GMP.MPN.GENERIC]MOD_1_RS.C
        SYS$DISK:[-.GMP.MPN.GENERIC]MUL.C
        SYS$DISK:[-.GMP.MPN.GENERIC]MUL_1.C
        SYS$DISK:[-.GMP.MPN.GENERIC]MUL_BASECASE.C
        SYS$DISK:[-.GMP.MPN.GENERIC]MUL_FFT.C
        SYS$DISK:[-.GMP.MPN.GENERIC]MUL_N.C
        SYS$DISK:[-.GMP.MPN.GENERIC]PERFSQR.C
        SYS$DISK:[-.GMP.MPN.GENERIC]POPCOUNT.C
        SYS$DISK:[-.GMP.MPN.GENERIC]PRE_MOD_1.C
        SYS$DISK:[-.GMP.MPN.GENERIC]RANDOM.C

  return mrand48 () | (mrand48 () << 32);
.......................^
%CC-W-SHIFTCOUNT, In this statement, the shift count "32" is negative or is 
greater than or equal to the promoted size of the operand "mrand48(...)".
at line number 38 in file DISK$WORK:[TEST.GCL.GMP]URANDOM.H;1
%LIBRAR-W-COMCOD, compilation warnings in module RANDOM file 
DISK$WORK:[TEST.GCL.GMP.MPN.GENERIC]RANDOM-AXP.OBJ;1
        SYS$DISK:[-.GMP.MPN.GENERIC]RANDOM2.C
        SYS$DISK:[-.GMP.MPN.GENERIC]RSHIFT.C
        SYS$DISK:[-.GMP.MPN.GENERIC]SB_DIVREM_MN.C
        SYS$DISK:[-.GMP.MPN.GENERIC]SCAN0.C
        SYS$DISK:[-.GMP.MPN.GENERIC]SCAN1.C
        SYS$DISK:[-.GMP.MPN.GENERIC]SET_STR.C
        SYS$DISK:[-.GMP.MPN.GENERIC]SQRTREM.C
        SYS$DISK:[-.GMP.MPN.GENERIC]SQR_BASECASE.C
        SYS$DISK:[-.GMP.MPN.GENERIC]SUBMUL_1.C
        SYS$DISK:[-.GMP.MPN.GENERIC]SUB_N.C
        SYS$DISK:[-.GMP.MPN.GENERIC]TDIV_QR.C

    abort ();
....^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 66 in file DISK$WORK:[TEST.GCL.GMP.MPN.GENERIC]TDIV_QR.C;1
        SYS$DISK:[-.GMP.MPZ]ABS.C
        SYS$DISK:[-.GMP.MPZ]ADD.C
        SYS$DISK:[-.GMP.MPZ]ADDMUL_UI.C
        SYS$DISK:[-.GMP.MPZ]ADD_UI.C
        SYS$DISK:[-.GMP.MPZ]AND.C
        SYS$DISK:[-.GMP.MPZ]ARRAY_INIT.C
        SYS$DISK:[-.GMP.MPZ]BIN_UI.C
        SYS$DISK:[-.GMP.MPZ]BIN_UIUI.C

          if (k1 != 0) abort ();
.......................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 111 in file DISK$WORK:[TEST.GCL.GMP.MPZ]BIN_UIUI.C;1
        SYS$DISK:[-.GMP.MPZ]CDIV_Q.C
        SYS$DISK:[-.GMP.MPZ]CDIV_QR.C
        SYS$DISK:[-.GMP.MPZ]CDIV_QR_UI.C
        SYS$DISK:[-.GMP.MPZ]CDIV_Q_UI.C
        SYS$DISK:[-.GMP.MPZ]CDIV_R.C
        SYS$DISK:[-.GMP.MPZ]CDIV_R_UI.C
        SYS$DISK:[-.GMP.MPZ]CDIV_UI.C
        SYS$DISK:[-.GMP.MPZ]CLEAR.C
        SYS$DISK:[-.GMP.MPZ]CLRBIT.C
        SYS$DISK:[-.GMP.MPZ]CMP.C
        SYS$DISK:[-.GMP.MPZ]CMPABS.C
        SYS$DISK:[-.GMP.MPZ]CMPABS_UI.C
        SYS$DISK:[-.GMP.MPZ]CMP_SI.C
        SYS$DISK:[-.GMP.MPZ]CMP_UI.C
        SYS$DISK:[-.GMP.MPZ]COM.C
        SYS$DISK:[-.GMP.MPZ]DIVEXACT.C
        SYS$DISK:[-.GMP.MPZ]DUMP.C
        SYS$DISK:[-.GMP.MPZ]FAC_UI.C

                    abort();
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 123 in file DISK$WORK:[TEST.GCL.GMP.MPZ]FAC_UI.C;1
        SYS$DISK:[-.GMP.MPZ]FDIV_Q.C
        SYS$DISK:[-.GMP.MPZ]FDIV_QR.C
        SYS$DISK:[-.GMP.MPZ]FDIV_QR_UI.C
        SYS$DISK:[-.GMP.MPZ]FDIV_Q_2EXP.C
        SYS$DISK:[-.GMP.MPZ]FDIV_Q_UI.C
        SYS$DISK:[-.GMP.MPZ]FDIV_R.C
        SYS$DISK:[-.GMP.MPZ]FDIV_R_2EXP.C
        SYS$DISK:[-.GMP.MPZ]FDIV_R_UI.C
        SYS$DISK:[-.GMP.MPZ]FDIV_UI.C
        SYS$DISK:[-.GMP.MPZ]FIB_UI.C
        SYS$DISK:[-.GMP.MPZ]FITS_SINT_P.C
        SYS$DISK:[-.GMP.MPZ]FITS_SLONG_P.C
        SYS$DISK:[-.GMP.MPZ]FITS_SSHORT_P.C
        SYS$DISK:[-.GMP.MPZ]FITS_UINT_P.C
        SYS$DISK:[-.GMP.MPZ]FITS_ULONG_P.C
        SYS$DISK:[-.GMP.MPZ]FITS_USHORT_P.C
        SYS$DISK:[-.GMP.MPZ]GCD.C
        SYS$DISK:[-.GMP.MPZ]GCDEXT.C
        SYS$DISK:[-.GMP.MPZ]GCD_UI.C
        SYS$DISK:[-.GMP.MPZ]GETLIMBN.C
        SYS$DISK:[-.GMP.MPZ]GET_D.C
        SYS$DISK:[-.GMP.MPZ]GET_SI.C
        SYS$DISK:[-.GMP.MPZ]GET_STR.C
        SYS$DISK:[-.GMP.MPZ]GET_UI.C
        SYS$DISK:[-.GMP.MPZ]HAMDIST.C
        SYS$DISK:[-.GMP.MPZ]INIT.C
        SYS$DISK:[-.GMP.MPZ]INP_RAW.C
        SYS$DISK:[-.GMP.MPZ]INP_STR.C
        SYS$DISK:[-.GMP.MPZ]INVERT.C
        SYS$DISK:[-.GMP.MPZ]IOR.C
        SYS$DISK:[-.GMP.MPZ]ISET.C
        SYS$DISK:[-.GMP.MPZ]ISET_D.C
        SYS$DISK:[-.GMP.MPZ]ISET_SI.C
        SYS$DISK:[-.GMP.MPZ]ISET_STR.C
        SYS$DISK:[-.GMP.MPZ]ISET_UI.C
        SYS$DISK:[-.GMP.MPZ]JACOBI.C
        SYS$DISK:[-.GMP.MPZ]KRONSZ.C
        SYS$DISK:[-.GMP.MPZ]KRONUZ.C
        SYS$DISK:[-.GMP.MPZ]KRONZS.C
        SYS$DISK:[-.GMP.MPZ]KRONZU.C
        SYS$DISK:[-.GMP.MPZ]LCM.C
        SYS$DISK:[-.GMP.MPZ]LEGENDRE.C
        SYS$DISK:[-.GMP.MPZ]MOD.C
        SYS$DISK:[-.GMP.MPZ]MUL.C
        SYS$DISK:[-.GMP.MPZ]MUL_2EXP.C
        SYS$DISK:[-.GMP.MPZ]NEG.C
        SYS$DISK:[-.GMP.MPZ]NEXTPRIME.C
        SYS$DISK:[-.GMP.MPZ]OUT_RAW.C
        SYS$DISK:[-.GMP.MPZ]OUT_STR.C
        SYS$DISK:[-.GMP.MPZ]PERFPOW.C
        SYS$DISK:[-.GMP.MPZ]PERFSQR.C
        SYS$DISK:[-.GMP.MPZ]POPCOUNT.C
        SYS$DISK:[-.GMP.MPZ]POWM.C
        SYS$DISK:[-.GMP.MPZ]POWM_UI.C
        SYS$DISK:[-.GMP.MPZ]POW_UI.C
        SYS$DISK:[-.GMP.MPZ]PPRIME_P.C

                        abort ();
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 110 in file DISK$WORK:[TEST.GCL.GMP.MPZ]PPRIME_P.C;1
        SYS$DISK:[-.GMP.MPZ]RANDOM.C

  return mrand48 () | (mrand48 () << 32);
.......................^
%CC-W-SHIFTCOUNT, In this statement, the shift count "32" is negative or is 
greater than or equal to the promoted size of the operand "mrand48(...)".
at line number 38 in file DISK$WORK:[TEST.GCL.GMP]URANDOM.H;1
%LIBRAR-W-COMCOD, compilation warnings in module RANDOM file 
DISK$WORK:[TEST.GCL.GMP.MPZ]RANDOM-AXP.OBJ;1
        SYS$DISK:[-.GMP.MPZ]RANDOM2.C
        SYS$DISK:[-.GMP.MPZ]REALLOC.C
        SYS$DISK:[-.GMP.MPZ]REMOVE.C
        SYS$DISK:[-.GMP.MPZ]ROOT.C

          abort ();                     /* abort if our root is far off */
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 158 in file DISK$WORK:[TEST.GCL.GMP.MPZ]ROOT.C;1
        SYS$DISK:[-.GMP.MPZ]RRANDOMB.C
        SYS$DISK:[-.GMP.MPZ]SCAN0.C
        SYS$DISK:[-.GMP.MPZ]SCAN1.C
        SYS$DISK:[-.GMP.MPZ]SET.C
        SYS$DISK:[-.GMP.MPZ]SETBIT.C
        SYS$DISK:[-.GMP.MPZ]SET_D.C

      abort ();
......^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 77 in file DISK$WORK:[TEST.GCL.GMP.MPZ]SET_D.C;1
        SYS$DISK:[-.GMP.MPZ]SET_F.C
        SYS$DISK:[-.GMP.MPZ]SET_Q.C
        SYS$DISK:[-.GMP.MPZ]SET_SI.C
        SYS$DISK:[-.GMP.MPZ]SET_STR.C
        SYS$DISK:[-.GMP.MPZ]SET_UI.C
        SYS$DISK:[-.GMP.MPZ]SIZE.C
        SYS$DISK:[-.GMP.MPZ]SIZEINBASE.C
        SYS$DISK:[-.GMP.MPZ]SQRT.C
        SYS$DISK:[-.GMP.MPZ]SQRTREM.C
        SYS$DISK:[-.GMP.MPZ]SUB.C
        SYS$DISK:[-.GMP.MPZ]SUB_UI.C
        SYS$DISK:[-.GMP.MPZ]SWAP.C
        SYS$DISK:[-.GMP.MPZ]TDIV_Q.C
        SYS$DISK:[-.GMP.MPZ]TDIV_QR.C
        SYS$DISK:[-.GMP.MPZ]TDIV_QR_UI.C
        SYS$DISK:[-.GMP.MPZ]TDIV_Q_2EXP.C
        SYS$DISK:[-.GMP.MPZ]TDIV_Q_UI.C
        SYS$DISK:[-.GMP.MPZ]TDIV_R.C
        SYS$DISK:[-.GMP.MPZ]TDIV_R_2EXP.C
        SYS$DISK:[-.GMP.MPZ]TDIV_R_UI.C
        SYS$DISK:[-.GMP.MPZ]TDIV_UI.C
        SYS$DISK:[-.GMP.MPZ]TSTBIT.C
        SYS$DISK:[-.GMP.MPZ]UI_POW_UI.C
        SYS$DISK:[-.GMP.MPZ]URANDOMB.C
        SYS$DISK:[-.GMP.MPZ]URANDOMM.C
        SYS$DISK:[-.GMP.MPZ]XOR.C

Compling The O Library.
Using Compile Command: 
CC/PREFIX=ALL/OPTIMIZE=(LEVEL=5,TUNE=HOST)/ARCH=HOST/NODEBUG/REENTRANCY=MULTITHREAD/FLOAT=IEEE_FLOAT/IEEE_MODE=DENORM_RESULTS/NEST=PRIMARY/NAME=(AS_IS,SHORTENED)/INCLUDE=(SYS$DISK:[-.H])


Converting SYS$DISK:[-.O]*.D; Files Into .C Files.
dpp: sys$disk:[-.o]character.d -> 
sys$disk:[-.o]character.c
dpp: sys$disk:[-.o]file.d -> 
sys$disk:[-.o]file.c
dpp: sys$disk:[-.o]hash.d -> 
sys$disk:[-.o]hash.c
dpp: sys$disk:[-.o]list.d -> 
sys$disk:[-.o]list.c
dpp: sys$disk:[-.o]package.d -> 
sys$disk:[-.o]package.c
dpp: sys$disk:[-.o]pathname.d -> 
sys$disk:[-.o]pathname.c
dpp: sys$disk:[-.o]print.d -> 
sys$disk:[-.o]print.c
dpp: sys$disk:[-.o]read.d -> 
sys$disk:[-.o]read.c
dpp: sys$disk:[-.o]sequence.d -> 
sys$disk:[-.o]sequence.c
dpp: sys$disk:[-.o]string.d -> 
sys$disk:[-.o]string.c
dpp: sys$disk:[-.o]symbol.d -> 
sys$disk:[-.o]symbol.c
    SYS$DISK:[-.O]MAIN.C

                system_directory= (char *) malloc(strlen(argv[0])+3);
...........................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "malloc" is implicitly 
declared as a function.
at line number 147 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        clear_stack(vs_top,vs_top+200);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "clear_stack" is 
implicitly declared as a function.
at line number 209 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        set_maxpage();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "set_maxpage" is 
implicitly declared as a function.
at line number 232 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

                        init_big1();
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_big1" is implicitly 
declared as a function.
at line number 250 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

                super_funcall(sStop_level);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "super_funcall" is 
implicitly declared as a function.
at line number 277 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

                  {multiply_stacks(fix(sSAmultiply_stacksA->s.s_dbind));
...................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "multiply_stacks" is 
implicitly declared as a function.
at line number 279 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        unlink_loaded_files();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "unlink_loaded_files" is 
implicitly declared as a function.
at line number 282 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

                exit(0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "exit" is implicitly 
declared as a function.
at line number 285 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        initlisp();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "initlisp" is implicitly 
declared as a function.
at line number 293 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_init();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_init" is implicitly 
declared as a function.
at line number 303 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        super_funcall(sStop_level);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "super_funcall" is 
implicitly declared as a function.
at line number 313 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

       (void) gcl_signal(SIGSEGV,segmentation_catcher);
..............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "gcl_signal" is 
implicitly declared as a function.
at line number 324 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

           FEerror("Caught fatal error [memory may be damaged]",0); }
...........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 340 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        abort();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 344 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_alloc();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_alloc" is 
implicitly declared as a function.
at line number 360 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_symbol();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_symbol" is 
implicitly declared as a function.
at line number 384 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_package();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_package" is 
implicitly declared as a function.
at line number 386 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        import(Cnil, lisp_package);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "import" is implicitly 
declared as a function.
at line number 389 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        export(Cnil, lisp_package);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "export" is implicitly 
declared as a function.
at line number 390 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        NewInit();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "NewInit" is implicitly 
declared as a function.
at line number 405 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_typespec();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_typespec" is 
implicitly declared as a function.
at line number 406 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_number();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_number" is 
implicitly declared as a function.
at line number 407 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_character();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_character" is 
implicitly declared as a function.
at line number 408 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_read();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_read" is implicitly 
declared as a function.
at line number 410 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_bind();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_bind" is implicitly 
declared as a function.
at line number 411 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_pathname();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_pathname" is 
implicitly declared as a function.
at line number 412 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_print();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_print" is 
implicitly declared as a function.
at line number 413 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_GBC();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_GBC" is implicitly 
declared as a function.
at line number 414 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_unixfasl();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_unixfasl" is 
implicitly declared as a function.
at line number 418 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_unixsys();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_unixsys" is 
implicitly declared as a function.
at line number 419 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_unixsave();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_unixsave" is 
implicitly declared as a function.
at line number 420 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_alloc_function();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_alloc_function" is 
implicitly declared as a function.
at line number 428 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_array_function();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_array_function" is 
implicitly declared as a function.
at line number 429 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_character_function();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_character_function" 
is implicitly declared as a function.
at line number 430 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_file_function();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_file_function" is 
implicitly declared as a function.
at line number 431 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_list_function();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_list_function" is 
implicitly declared as a function.
at line number 432 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_package_function();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_package_function" 
is implicitly declared as a function.
at line number 433 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_pathname_function();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_pathname_function" 
is implicitly declared as a function.
at line number 434 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_predicate_function();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_predicate_function" 
is implicitly declared as a function.
at line number 435 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_print_function();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_print_function" is 
implicitly declared as a function.
at line number 436 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_read_function();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_read_function" is 
implicitly declared as a function.
at line number 437 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_sequence_function();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_sequence_function" 
is implicitly declared as a function.
at line number 438 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_structure_function();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_structure_function" 
is implicitly declared as a function.
at line number 442 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_string_function();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_string_function" is 
implicitly declared as a function.
at line number 443 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_symbol_function();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_symbol_function" is 
implicitly declared as a function.
at line number 444 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_typespec_function();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_typespec_function" 
is implicitly declared as a function.
at line number 445 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_hash();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_hash" is implicitly 
declared as a function.
at line number 446 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_cfun();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_cfun" is implicitly 
declared as a function.
at line number 447 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_unixfsys();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_unixfsys" is 
implicitly declared as a function.
at line number 450 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_unixtime();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_unixtime" is 
implicitly declared as a function.
at line number 451 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_eval();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_eval" is implicitly 
declared as a function.
at line number 453 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_lex();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_lex" is implicitly 
declared as a function.
at line number 454 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_prog();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_prog" is implicitly 
declared as a function.
at line number 455 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_catch();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_catch" is 
implicitly declared as a function.
at line number 456 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_block();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_block" is 
implicitly declared as a function.
at line number 457 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_macros();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_macros" is 
implicitly declared as a function.
at line number 458 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_conditional();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_conditional" is 
implicitly declared as a function.
at line number 459 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_reference();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_reference" is 
implicitly declared as a function.
at line number 460 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_assignment();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_assignment" is 
implicitly declared as a function.
at line number 461 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_multival();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_multival" is 
implicitly declared as a function.
at line number 462 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_error();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_error" is 
implicitly declared as a function.
at line number 463 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_let();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_let" is implicitly 
declared as a function.
at line number 464 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_mapfun();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_mapfun" is 
implicitly declared as a function.
at line number 465 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_iteration();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_iteration" is 
implicitly declared as a function.
at line number 466 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_toplevel();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_toplevel" is 
implicitly declared as a function.
at line number 467 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_cmpaux();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_cmpaux" is 
implicitly declared as a function.
at line number 469 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_main();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_main" is implicitly 
declared as a function.
at line number 471 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_format();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_format" is 
implicitly declared as a function.
at line number 473 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_links();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_links" is 
implicitly declared as a function.
at line number 474 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_fat_string();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_fat_string" is 
implicitly declared as a function.
at line number 476 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_cmac();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_cmac" is implicitly 
declared as a function.
at line number 478 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        FEerror("Value stack overflow.", 0);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 488 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        FEerror("Bind stack overflow.", 0);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 498 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        FEerror("Frame stack overflow.", 0);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 507 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        FEerror("Invocation history stack overflow.", 0);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 516 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        FEerror("Control stack overflow.", 0);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 544 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

DEFUNO("BYE",int,fLbye,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 552 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        exit(exit_code);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "exit" is implicitly 
declared as a function.
at line number 566 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        check_arg(0);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 581 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 589 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

                FEerror("Illegal argument index: ~S.", 1, vs_base[0]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 593 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 605 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        check_type_string(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_string" is 
implicitly declared as a function.
at line number 606 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

                FEerror("Too long name: ~S.", 1, vs_base[0]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 608 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        check_arg(0);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 628 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        check_arg(0);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 635 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

                FEerror("Value stack is flawed.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 637 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        check_arg(0);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 651 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

   array_allocself(stack_space,1,code_char(0));
...^
%CC-I-IMPLICITFUNC, In this statement, the identifier "array_allocself" is 
implicitly declared as a function.
at line number 706 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        check_arg(0);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 727 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        init_system();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_system" is 
implicitly declared as a function.
at line number 728 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 734 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 740 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        vs_base[0] = (object)fixint(vs_base[0]);
.............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "fixint" is implicitly 
declared as a function.
at line number 741 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        check_arg(0);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 746 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        exit(0);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "exit" is implicitly 
declared as a function.
at line number 748 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

DEFUNO("IDENTITY",object,fLidentity,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 751 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

DEFUNO("LISP-IMPLEMENTATION-VERSION",object,fLlisp_implementation_version,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 759 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        GBC(t_contiguous);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "GBC" is implicitly 
declared as a function.
at line number 789 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        brk(core_end);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "brk" is implicitly 
declared as a function.
at line number 794 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1

        Lsave();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "Lsave" is implicitly 
declared as a function.
at line number 812 in file DISK$WORK:[TEST.GCL.O]MAIN.C;1
    SYS$DISK:[-.O]ALLOC.C

#include "gclincl.h"
....................^
%CC-I-FOUNDCR, A carriage-return character was encountered; it is being treated 
as white space.
at line number 36 in file DISK$WORK:[TEST.GCL.H]INCLUDE.H;1

eg to add 20 more do (si::set-hole-size %d %d)\n...start over ", new_holepage, 
20+ reserve_pages_for_signal_handler); fflush(stderr); exit(1);}
......................................................................................................................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "exit" is implicitly 
declared as a function.
at line number 108 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

                        GBC(t_relocatable);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "GBC" is implicitly 
declared as a function.
at line number 110 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

    { set_up_string_register(tm_table[(int)t].tm_name+1);
......^
%CC-I-IMPLICITFUNC, In this statement, the identifier "set_up_string_register" 
is implicitly declared as a function.
at line number 203 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

        GBC(tm->tm_type);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "GBC" is implicitly 
declared as a function.
at line number 251 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

        CEerror("The storage for ~A is exhausted.~%\
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "CEerror" is implicitly 
declared as a function.
at line number 271 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

        GBC(t_cons);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "GBC" is implicitly 
declared as a function.
at line number 333 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

        CEerror("The storage for CONS is exhausted.~%\
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "CEerror" is implicitly 
declared as a function.
at line number 351 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

{ struct typemanager *tm=(&tm_table[t_from_type(typ)]);
....................................^
%CC-I-IMPLICITFUNC, In the initializer for tm, the identifier "t_from_type" is 
implicitly declared as a function.
at line number 377 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

   { tm_table[t_from_type(typ)].tm_nused = 0;}
..............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "t_from_type" is 
implicitly declared as a function.
at line number 404 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

                        insert_contblock(p+n, i);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "insert_contblock" is 
implicitly declared as a function.
at line number 438 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

                        GBC(t_contiguous);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "GBC" is implicitly 
declared as a function.
at line number 447 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

                CEerror("Contiguous blocks exhausted.~%\
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "CEerror" is implicitly 
declared as a function.
at line number 461 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

        insert_contblock(p+n, PAGESIZE*m - n);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "insert_contblock" is 
implicitly declared as a function.
at line number 476 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

                        GBC(t_relocatable);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "GBC" is implicitly 
declared as a function.
at line number 523 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

                            FEerror("bad rb_end",0);
............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 546 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

                CEerror("Relocatable blocks exhausted.~%\
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "CEerror" is implicitly 
declared as a function.
at line number 557 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

        FEerror("Can't get a type.", 0);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 745 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

DEFUNO("ALLOCATE",object,fSallocate,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 748 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

        CHECK_ARG_RANGE(2,3);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_range" is 
implicitly declared as a function.
at line number 770 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

        t= t_from_type(type);
...........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "t_from_type" is 
implicitly declared as a function.
at line number 771 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

                FEerror("Allocate takes positive argument.", 1,
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 773 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

 check_type_or_symbol_string(&type);
.^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"check_type_or_symbol_string" is implicitly declared as a function.
at line number 808 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

      0==strncmp((tm->tm_name)+1,type->st.st_self,type->st.st_fillp)
.........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "strncmp" is implicitly 
declared as a function.
at line number 812 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

 FEerror("Unrecognized type",0);
.^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 815 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

DEFUNO("ALLOCATE-CONTIGUOUS-PAGES",object,fSallocate_contiguous_pages,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 872 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

        CHECK_ARG_RANGE(1,2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_range" is 
implicitly declared as a function.
at line number 889 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

                FEerror("Allocate requires positive argument.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 891 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

DEFUNO("ALLOCATED-CONTIGUOUS-PAGES",object,fSallocated_contiguous_pages,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 911 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

DEFUNO("MAXIMUM-CONTIGUOUS-PAGES",object,fSmaximum_contiguous_pages,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 918 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

DEFUNO("ALLOCATE-RELOCATABLE-PAGES",object,fSallocate_relocatable_pages,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 926 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

        CHECK_ARG_RANGE(1,2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_range" is 
implicitly declared as a function.
at line number 942 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

                FEerror("Requires positive arg",0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 944 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

DEFUNO("ALLOCATED-RELOCATABLE-PAGES",object,fSallocated_relocatable_pages,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 958 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

DEFUNO("GET-HOLE-SIZE",object,fSget_hole_size,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 965 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

DEFUNO("SET-HOLE-SIZE",object,fSset_hole_size,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 972 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

                FEerror("Illegal value for the hole size.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 988 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

        for (p = &malloc_list; *p && !endp(*p);  p = &((*p)->c.c_cdr))
......................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 1114 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

        for (x = malloc_list;  !endp(x);  x = x->c.c_cdr)
................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 1156 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1

        FEerror("realloc(3) error.", 0);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 1172 in file DISK$WORK:[TEST.GCL.O]ALLOC.C;1
    SYS$DISK:[-.O]GBC.C

#include "gclincl.h"
....................^
%CC-I-FOUNDCR, A carriage-return character was encountered; it is being treated 
as white space.
at line number 36 in file DISK$WORK:[TEST.GCL.H]INCLUDE.H;1

                mark_object(x->c.c_car);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "mark_object" is 
implicitly declared as a function.
at line number 172 in file DISK$WORK:[TEST.GCL.O]GBC.C;1

                                        mark_contblock(x->s.s_self,
........................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "mark_contblock" is 
implicitly declared as a function.
at line number 245 in file DISK$WORK:[TEST.GCL.O]GBC.C;1

                        mark_contblock((char *)(x->p.p_internal),
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "mark_contblock" is 
implicitly declared as a function.
at line number 262 in file DISK$WORK:[TEST.GCL.O]GBC.C;1

                                adjust_displaced(x, i);
................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "adjust_displaced" is 
implicitly declared as a function.
at line number 377 in file DISK$WORK:[TEST.GCL.O]GBC.C;1

                                adjust_displaced(x, i);
................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "adjust_displaced" is 
implicitly declared as a function.
at line number 439 in file DISK$WORK:[TEST.GCL.O]GBC.C;1

                   ((BV_OFFSET(x) + x->bv.bv_dim + W_SIZE -1)/W_SIZE);
.....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 453 in file DISK$WORK:[TEST.GCL.O]GBC.C;1

        clear_stack(vs_top,vs_limit);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "clear_stack" is 
implicitly declared as a function.
at line number 674 in file DISK$WORK:[TEST.GCL.O]GBC.C;1

         mark_c_stack(0,N_RECURSION_REQD,mark_stack_carefully);
.........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "mark_c_stack" is 
implicitly declared as a function.
at line number 742 in file DISK$WORK:[TEST.GCL.O]GBC.C;1

                        insert_contblock(p, q - p);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "insert_contblock" is 
implicitly declared as a function.
at line number 902 in file DISK$WORK:[TEST.GCL.O]GBC.C;1

                    exit(1);
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "exit" is implicitly 
declared as a function.
at line number 1172 in file DISK$WORK:[TEST.GCL.O]GBC.C;1

        check_arg(0);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 1224 in file DISK$WORK:[TEST.GCL.O]GBC.C;1

        vs_check_push(make_fixnum(real_maxpage));
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "vs_overflow" is 
implicitly declared as a function.
at line number 1230 in file DISK$WORK:[TEST.GCL.O]GBC.C;1

        check_arg(0);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 1262 in file DISK$WORK:[TEST.GCL.O]GBC.C;1

DEFUNO("GBC",object,fLgbc,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 1307 in file DISK$WORK:[TEST.GCL.O]GBC.C;1
    SYS$DISK:[-.O]BITOP.C
    SYS$DISK:[-.O]TYPESPEC.C

                        if (big_sign((*p)) >= 0)
............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "big_sign" is implicitly 
declared as a function.
at line number 57 in file DISK$WORK:[TEST.GCL.O]TYPESPEC.C;1

   FEerror("~s is not a ~a",2,
...^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 287 in file DISK$WORK:[TEST.GCL.O]TYPESPEC.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 297 in file DISK$WORK:[TEST.GCL.O]TYPESPEC.C;1
    SYS$DISK:[-.O]EVAL.C

    {check_arg_failed(n);}
.....^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 88 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

     :(object) FEerror("Bad result type",0));
...............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 105 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

    {FEtoo_few_arguments(base,vs_top); return;}
.....^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_arguments" is 
implicitly declared as a function.
at line number 130 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

    {FEtoo_many_arguments(base,vs_top); return;}
.....^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_many_arguments" is 
implicitly declared as a function.
at line number 132 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                FEerror("Undefined function.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 156 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                MMcall(fun);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "ihs_overflow" is 
implicitly declared as a function.
at line number 159 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                for (l = fun->cc.cc_env;  !endp(l);  l = l->c.c_cdr)
...........................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 194 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                FEundefined_function(fun);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEundefined_function" is 
implicitly declared as a function.
at line number 207 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                FEinvalid_function(fun);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEinvalid_function" is 
implicitly declared as a function.
at line number 214 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

          ihs_check;
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "ihs_overflow" is 
implicitly declared as a function.
at line number 227 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

        lambda_bind(top);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "lambda_bind" is 
implicitly declared as a function.
at line number 291 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                frs_push(FRS_CATCH, fun);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "frs_overflow" is 
implicitly declared as a function.
at line number 300 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

        if(endp(x)) {
...........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 307 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                        eval(MMcar(x));
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 313 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

        bds_unwind(old_bds_top);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bds_unwind" is 
implicitly declared as a function.
at line number 323 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                FEerror("Undefined function.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 336 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                for (l = fun->cc.cc_env;  !endp(l);  l = l->c.c_cdr)
...........................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 352 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                FEerror("Undefined function.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 385 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                MMcall(fun);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "ihs_overflow" is 
implicitly declared as a function.
at line number 388 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                for (l = fun->cc.cc_env;  !endp(l);  l = l->c.c_cdr)
...........................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 401 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                FEerror("Undefined function.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 427 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                for (l = fun->cc.cc_env;  !endp(l);  l = l->c.c_cdr)
...........................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 443 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                FEerror("Undefined function.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 472 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                MMcall(fun);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "ihs_overflow" is 
implicitly declared as a function.
at line number 475 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                for (l = fun->cc.cc_env;  !endp(l);  l = l->c.c_cdr)
...........................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 488 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                FEerror("Undefined function.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 515 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                for (l = fun->cc.cc_env;  !endp(l);  l = l->c.c_cdr)
...........................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 531 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                FEerror("Undefined function.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 561 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                MMcall(fun);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "ihs_overflow" is 
implicitly declared as a function.
at line number 564 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                for (l = fun->cc.cc_env;  !endp(l);  l = l->c.c_cdr)
...........................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 577 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                FEerror("Undefined function.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 609 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                for (l = fun->cc.cc_env;  !endp(l);  l = l->c.c_cdr)
...........................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 625 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                FEerror("Undefined function.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 657 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                MMcall(fun);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "ihs_overflow" is 
implicitly declared as a function.
at line number 660 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                for (l = fun->cc.cc_env;  !endp(l);  l = l->c.c_cdr)
...........................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 673 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                FEerror("Undefined function.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 705 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                for (l = fun->cc.cc_env;  !endp(l);  l = l->c.c_cdr)
...........................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 721 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                        FEinvalid_function(fun);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEinvalid_function" is 
implicitly declared as a function.
at line number 743 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                        FEundefined_function(fun);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEundefined_function" is 
implicitly declared as a function.
at line number 745 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                        FEinvalid_function(fun);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEinvalid_function" is 
implicitly declared as a function.
at line number 765 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                        FEundefined_function(fun);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEundefined_function" is 
implicitly declared as a function.
at line number 767 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

{ eval(form);
..^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 937 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

        vs_check;
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "vs_overflow" is 
implicitly declared as a function.
at line number 958 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                stack_cons();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "stack_cons" is 
implicitly declared as a function.
at line number 973 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                bds_unwind(old_bds_top);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bds_unwind" is 
implicitly declared as a function.
at line number 977 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                        FEunbound_variable(form);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEunbound_variable" is 
implicitly declared as a function.
at line number 1000 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                                if (endp(x))
....................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 1010 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                ihs_check;
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "ihs_overflow" is 
implicitly declared as a function.
at line number 1047 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                FEundefined_function(fun);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEundefined_function" is 
implicitly declared as a function.
at line number 1069 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

        ihs_check;
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "ihs_overflow" is 
implicitly declared as a function.
at line number 1084 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

        while(!endp(form)) {
...............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 1090 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                call_applyhook(fun);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "call_applyhook" is 
implicitly declared as a function.
at line number 1098 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

        FEinvalid_function(fun);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEinvalid_function" is 
implicitly declared as a function.
at line number 1120 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                stack_cons();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "stack_cons" is 
implicitly declared as a function.
at line number 1133 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

DEFUNO("FUNCALL",object,fLfuncall,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 1147 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

  {COERCE_VA_LIST(new,ap,n);
...^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 1155 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

DEFUNO("APPLY",object,fLapply,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 1162 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

        while (!endp(list))
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 1180 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

          { if (m >= MAX_ARGS) FEerror(" Lisps arglist maximum surpassed",0);
...............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 1181 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

DEFUNO("EVAL",object,fLeval,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 1189 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 1211 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 1223 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

        bds_unwind(old_bds_top);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bds_unwind" is 
implicitly declared as a function.
at line number 1229 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 1244 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 1256 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

        for (l = vs_base[1];  !endp(l);  l = l->c.c_cdr)
...............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 1260 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

        bds_unwind(old_bds_top);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bds_unwind" is 
implicitly declared as a function.
at line number 1266 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

DEFUNO("CONSTANTP",object,fLconstantp,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 1269 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

        frs_push(FRS_CATCH, make_cons(fname, make_fixnum(n)));
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "frs_overflow" is 
implicitly declared as a function.
at line number 1372 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

      FEerror("bad args",0);
......^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 1404 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

                for (l = fun->cc.cc_env;  !endp(l);  l = l->c.c_cdr)
...........................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 1416 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

           (object) FEerror("bad type",0));
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 1447 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

          (object) FEerror("bad type",0));
...................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 1460 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

 {COERCE_VA_LIST(new,vl,fcall.argd);
..^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 1467 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1

        FEerror("bad args",0);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 1498 in file DISK$WORK:[TEST.GCL.O]EVAL.C;1
    SYS$DISK:[-.O]MACROS.C

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 35 in file DISK$WORK:[TEST.GCL.O]MACROS.C;1

                not_a_symbol(vs_base[0]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 37 in file DISK$WORK:[TEST.GCL.O]MACROS.C;1

                        FEerror("~S, a special form, cannot be redefined.",
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 43 in file DISK$WORK:[TEST.GCL.O]MACROS.C;1

        if (endp(form) || endp(MMcdr(form)))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 79 in file DISK$WORK:[TEST.GCL.O]MACROS.C;1

                FEtoo_few_argumentsF(form);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 80 in file DISK$WORK:[TEST.GCL.O]MACROS.C;1

                not_a_symbol(name);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 83 in file DISK$WORK:[TEST.GCL.O]MACROS.C;1

                        FEerror("~S, a special form, cannot be redefined.",
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 103 in file DISK$WORK:[TEST.GCL.O]MACROS.C;1

DEFUNO("MACROEXPAND",object,fLmacroexpand,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 173 in file DISK$WORK:[TEST.GCL.O]MACROS.C;1

        else check_arg_range(1,2);
.............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_range" is 
implicitly declared as a function.
at line number 202 in file DISK$WORK:[TEST.GCL.O]MACROS.C;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 231 in file DISK$WORK:[TEST.GCL.O]MACROS.C;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 241 in file DISK$WORK:[TEST.GCL.O]MACROS.C;1

        super_funcall(symbol_value(sLAmacroexpand_hookA));
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "super_funcall" is 
implicitly declared as a function.
at line number 305 in file DISK$WORK:[TEST.GCL.O]MACROS.C;1
    SYS$DISK:[-.O]LEX.C

        while (!endp(alist)) {
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 38 in file DISK$WORK:[TEST.GCL.O]LEX.C;1

        while (!endp(alist)) {
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 101 in file DISK$WORK:[TEST.GCL.O]LEX.C;1

        while (!endp(alist)) {
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 116 in file DISK$WORK:[TEST.GCL.O]LEX.C;1
    SYS$DISK:[-.O]BDS.C
    SYS$DISK:[-.O]FRAME.C

        bds_unwind(frs_top->frs_bds_top);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bds_unwind" is 
implicitly declared as a function.
at line number 50 in file DISK$WORK:[TEST.GCL.O]FRAME.C;1
    SYS$DISK:[-.O]PREDICATE.C

DEFUNO("NOT",object,fLnot,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 33 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("SYMBOLP",object,fLsymbolp,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 46 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("ATOM",object,fLatom  ,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 59 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("CONSP",object,fLconsp,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 72 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("LISTP",object,fLlistp,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 85 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("NUMBERP",object,fLnumberp,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 98 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("INTEGERP",object,fLintegerp ,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 115 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("RATIONALP",object,fLrationalp,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 130 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("FLOATP",object,fLfloatp,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 162 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("COMPLEXP",object,fLcomplexp,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 176 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("CHARACTERP",object,fLcharacterp,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 188 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("STRINGP",object,fLstringp ,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 200 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("BIT-VECTOR-P",object,fLbit_vector_p,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 212 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("VECTORP",object,fLvectorp,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 224 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("SIMPLE-STRING-P",object,fLsimple_string_p,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 238 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("SIMPLE-BIT-VECTOR-P",object,fLsimple_bit_vector_p ,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 253 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("SIMPLE-VECTOR-P",object,fLsimple_vector_p ,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 268 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("ARRAYP",object,fLarrayp ,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 286 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("PACKAGEP",object,fLpackagep ,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 301 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("FUNCTIONP",object,fLfunctionp,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 313 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("COMPILED-FUNCTION-P",object,fLcompiled_function_p,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 344 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("COMMONP",object,fLcommonp,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 365 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("EQ",object,fLeq,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 377 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

                if (big_compare((struct bignum *)x,
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "big_compare" is 
implicitly declared as a function.
at line number 410 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("EQL",object,fLeql,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 453 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

                return(string_eq(x, y));
.......................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "string_eq" is implicitly 
declared as a function.
at line number 507 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

                ox = BV_OFFSET(x);
.....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 515 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("EQUAL",object,fLequal,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 541 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

                        return(!number_compare(x, y));
................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_compare" is 
implicitly declared as a function.
at line number 580 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

                return(char_equal(x, y));
.......................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "char_equal" is 
implicitly declared as a function.
at line number 613 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("EQUALP",object,fLequalp,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 679 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

        if (endp(args)) {
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 699 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

                eval(MMcar(args));
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 705 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

        eval(MMcar(args));
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 714 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

        if (endp(args)) {
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 724 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

                eval(MMcar(args));
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 730 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

        eval(MMcar(args));
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 740 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("CONTAINS-SHARP-COMMA",object,fScontains_sharp_comma,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 795 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("SPICEP",object,fSspicep  ,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 808 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1

DEFUNO("FIXNUMP",object,fSfixnump,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 820 in file DISK$WORK:[TEST.GCL.O]PREDICATE.C;1
    SYS$DISK:[-.O]REFERENCE.C

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 35 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

                not_a_symbol(sym);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 38 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

                FEinvalid_function(sym);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEinvalid_function" is 
implicitly declared as a function.
at line number 56 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

                FEundefined_function(sym);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEundefined_function" is 
implicitly declared as a function.
at line number 58 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 72 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

                not_a_symbol(sym);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 75 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

                stack_cons();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "stack_cons" is 
implicitly declared as a function.
at line number 79 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

                FEundefined_function(sym);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEundefined_function" is 
implicitly declared as a function.
at line number 83 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

                stack_cons();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "stack_cons" is 
implicitly declared as a function.
at line number 87 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

        if (endp(form))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 98 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

                FEtoo_few_argumentsF(form);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 99 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

                FEtoo_many_argumentsF(form);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_many_argumentsF" 
is implicitly declared as a function.
at line number 101 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

        if (endp(form))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 113 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

                FEtoo_few_argumentsF(form);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 114 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

                FEtoo_many_argumentsF(form);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_many_argumentsF" 
is implicitly declared as a function.
at line number 116 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

                                FEundefined_function(fun);
................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEundefined_function" is 
implicitly declared as a function.
at line number 122 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

                FEinvalid_function(fun);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEinvalid_function" is 
implicitly declared as a function.
at line number 139 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 145 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

                not_a_symbol(sym);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 148 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

                FEunbound_variable(sym);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEunbound_variable" is 
implicitly declared as a function.
at line number 150 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 158 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

                not_a_symbol(sym);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 161 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 170 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

                not_a_symbol(vs_base[0]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 172 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 181 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1

                not_a_symbol(vs_base[0]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 183 in file DISK$WORK:[TEST.GCL.O]REFERENCE.C;1
    SYS$DISK:[-.O]ASSIGNMENT.C

                not_a_symbol(sym);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 69 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                FEinvalid_variable("Cannot assign to the constant ~S.", sym);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEinvalid_variable" is 
implicitly declared as a function.
at line number 75 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                if(MMnull(vd) || endp(MMcdr(vd)))
.................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 78 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

        if (endp(form)) {
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 90 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                        FEinvalid_form("No value for ~S.", form->c.c_car);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEinvalid_form" is 
implicitly declared as a function.
at line number 98 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

        for (top = old_top;  !endp(arg);  arg = MMcddr(arg), top++) {
..............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 115 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                        FEinvalid_form("No value for ~S.", arg->c.c_car);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEinvalid_form" is 
implicitly declared as a function.
at line number 117 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

DEFUNO("SET",object,fLset,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 128 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                not_a_symbol(symbol);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 134 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                FEinvalid_variable("Cannot assign to the constant ~S.",
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEinvalid_variable" is 
implicitly declared as a function.
at line number 136 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

DEFUNO("FSET",object,fSfset,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 142 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                not_a_symbol(sym);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 148 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                        FEerror("~S, a special form, cannot be redefined.",
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 154 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                FEerror("Cannot define a special form.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 174 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

        if (endp(form) || endp(form->c.c_cdr) ||
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 194 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

            FEinvalid_form("~S is an illegal argument to MULTIPLE-VALUE-SETQ",
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEinvalid_form" is 
implicitly declared as a function.
at line number 196 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

DEFUNO("MAKUNBOUND",object,fLmakunbound,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 212 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                not_a_symbol(sym);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 218 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                FEinvalid_variable("Cannot unbind the constant ~S.",
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEinvalid_variable" is 
implicitly declared as a function.
at line number 220 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

DEFUNO("FMAKUNBOUND",object,fLfmakunbound,LISP
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 228 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                not_a_symbol(sym);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 234 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                        FEerror("~S, a special form, cannot be redefined.",
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 240 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

        remf(&(sym->s.s_plist),sStraced);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "remf" is implicitly 
declared as a function.
at line number 243 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

        if (endp(form)) {
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 260 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                        FEinvalid_form("No value for ~S.", form->c.c_car);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEinvalid_form" is 
implicitly declared as a function.
at line number 268 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                        FEerror("~S is not a cons.", 1, x);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 329 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                        FEerror("~S is not a cons.", 1, x);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 337 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

        for (;  !endp(args);  args = args->c.c_cdr) {
.................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 373 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

        stack_cons();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "stack_cons" is 
implicitly declared as a function.
at line number 388 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                FEerror("Where is SETF?", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 399 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

        funcall(sLsetf->s.s_gfdef);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "funcall" is implicitly 
declared as a function.
at line number 400 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

        if (endp(form) || endp(MMcdr(form)))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 410 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                FEtoo_few_argumentsF(form);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 411 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                FEtoo_many_argumentsF(form);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_many_argumentsF" 
is implicitly declared as a function.
at line number 413 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                eval(MMcar(form));
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 416 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

        stack_cons();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "stack_cons" is 
implicitly declared as a function.
at line number 426 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                FEerror("Where is PUSH?", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 431 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

        funcall(sLpush->s.s_gfdef);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "funcall" is implicitly 
declared as a function.
at line number 432 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

        eval(vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 433 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

        if (endp(form))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 442 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                FEtoo_few_argumentsF(form);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 443 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                FEtoo_many_argumentsF(form);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_many_argumentsF" 
is implicitly declared as a function.
at line number 445 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                eval(var);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 448 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

        stack_cons();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "stack_cons" is 
implicitly declared as a function.
at line number 456 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                FEerror("Where is POP?", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 461 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

        funcall(sLpop->s.s_gfdef);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "funcall" is implicitly 
declared as a function.
at line number 462 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

        eval(vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 463 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

        if (endp(form))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 473 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                FEtoo_few_argumentsF(form);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 474 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                FEtoo_many_argumentsF(form);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_many_argumentsF" 
is implicitly declared as a function.
at line number 476 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                        eval(var);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 480 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                eval(MMcadr(form));
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 485 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

        stack_cons();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "stack_cons" is 
implicitly declared as a function.
at line number 495 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                FEerror("Where is INCF?", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 500 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

        funcall(sLincf->s.s_gfdef);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "funcall" is implicitly 
declared as a function.
at line number 501 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

        eval(vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 502 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

        if (endp(form))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 512 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                FEtoo_few_argumentsF(form);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 513 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                FEtoo_many_argumentsF(form);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_many_argumentsF" 
is implicitly declared as a function.
at line number 515 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                        eval(var);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 519 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                eval(MMcadr(form));
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 524 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

        stack_cons();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "stack_cons" is 
implicitly declared as a function.
at line number 534 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

                FEerror("Where is DECF?", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 539 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

        funcall(sLdecf->s.s_gfdef);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "funcall" is implicitly 
declared as a function.
at line number 540 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

        eval(vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 541 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1

DEFUNO("CLEAR-COMPILER-PROPERTIES",object,fSclear_compiler_properties,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 561 in file DISK$WORK:[TEST.GCL.O]ASSIGNMENT.C;1
    SYS$DISK:[-.O]BIND.C

        bds_check;
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bds_overflow" is 
implicitly declared as a function.
at line number 96 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                FEerror("No lambda list.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 99 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                if (endp(lambda_list))
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 106 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                check_symbol(x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 110 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                        illegal_lambda();
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "illegal_lambda" is 
implicitly declared as a function.
at line number 112 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                if (endp(lambda_list))
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 147 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                        check_symbol(x->c.c_car);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 152 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                        check_var(x->c.c_car);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_variable" is 
implicitly declared as a function.
at line number 153 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                                illegal_lambda();
................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "illegal_lambda" is 
implicitly declared as a function.
at line number 174 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                        check_symbol(x);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 176 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                                illegal_lambda();
................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "illegal_lambda" is 
implicitly declared as a function.
at line number 179 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                        check_var(x);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_variable" is 
implicitly declared as a function.
at line number 186 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

        if (endp(lambda_list))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 195 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                illegal_lambda();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "illegal_lambda" is 
implicitly declared as a function.
at line number 196 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

        check_symbol(lambda_list->c.c_car);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 197 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

        check_var(lambda_list->c.c_car);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_variable" is 
implicitly declared as a function.
at line number 198 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                                if (!keywordp(x->c.c_car->c.c_car))
.....................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "keywordp" is implicitly 
declared as a function.
at line number 227 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                                illegal_declare(form);
................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "illegal_declare" is 
implicitly declared as a function.
at line number 339 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                        check_arg_failed(nreq);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 394 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                FEtoo_few_arguments(base, arg_top);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_arguments" is 
implicitly declared as a function.
at line number 396 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                        check_arg_failed(nreq);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 402 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                FEtoo_many_arguments(base, arg_top);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_many_arguments" is 
implicitly declared as a function.
at line number 404 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                bind_var(required[i].req_var,
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bind_var" is implicitly 
declared as a function.
at line number 407 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                        eval_assign(temporary, optional[i].opt_init);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 420 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                        if (!keywordp(base[i]))
.............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "keywordp" is implicitly 
declared as a function.
at line number 441 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                        eval_assign(temporary, keyword[i].key_init);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 477 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                eval_assign(temporary, aux[i].aux_init);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 487 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                                illegal_declare(form);
................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "illegal_declare" is 
implicitly declared as a function.
at line number 517 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                check_arg_failed(nreq);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 547 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                FEerror("Cannot bind the constant ~S.", 1, var);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 571 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

        FEerror("Illegal lambda expression.", 0);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 596 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

        for (;  !endp(body);  body = body->c.c_cdr) {
.................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 622 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                                illegal_declare(form);
................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "illegal_declare" is 
implicitly declared as a function.
at line number 638 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                                        check_symbol(v);
........................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 643 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

        bds_check;
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bds_overflow" is 
implicitly declared as a function.
at line number 675 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                eval_assign(bt->bt_init, bt->bt_init);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 678 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

        bds_check;
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bds_overflow" is 
implicitly declared as a function.
at line number 693 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                eval_assign(bt->bt_init, bt->bt_init);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 696 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                FEerror("Odd number of arguments for keywords.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 738 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                if (!keywordp(k))
.....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "keywordp" is implicitly 
declared as a function.
at line number 741 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                if (!keywordp(k)) {
.....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "keywordp" is implicitly 
declared as a function.
at line number 780 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                        stack_cons();
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "stack_cons" is 
implicitly declared as a function.
at line number 800 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

        for (;  !endp(l);  l = l->c.c_cdr->c.c_cdr) {
.................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 831 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                if (!keywordp(k))
.....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "keywordp" is implicitly 
declared as a function.
at line number 833 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                        FEerror("~S is not a keyword.", 1, k);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 834 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                        bzero(buf,n);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bzero" is implicitly 
declared as a function.
at line number 841 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

                FEerror("The keyword ~S is not allowed or is duplicated.",
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 851 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

 COERCE_VA_LIST(new,ap,n);
.^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 871 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

  if (n!=0) FEerror("Odd number of keys",0);
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 909 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

 COERCE_VA_LIST(new,ap,n);
.^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 922 in file DISK$WORK:[TEST.GCL.O]BIND.C;1

  if (n!=0) FEerror("Odd number of keys",0);
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 967 in file DISK$WORK:[TEST.GCL.O]BIND.C;1
    SYS$DISK:[-.O]LET.C

        for (x = var_list;  !endp(x);  x = x->c.c_cdr) {
.............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 35 in file DISK$WORK:[TEST.GCL.O]LET.C;1

                        check_var(y);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_variable" is 
implicitly declared as a function.
at line number 38 in file DISK$WORK:[TEST.GCL.O]LET.C;1

                        check_var(y->c.c_car);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_variable" is 
implicitly declared as a function.
at line number 45 in file DISK$WORK:[TEST.GCL.O]LET.C;1

                         FEerror("Too many initial forms to the variable ~S.",
.........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 53 in file DISK$WORK:[TEST.GCL.O]LET.C;1

        if (endp(form))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 71 in file DISK$WORK:[TEST.GCL.O]LET.C;1

                FEerror("No argument to LET.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 72 in file DISK$WORK:[TEST.GCL.O]LET.C;1

        Fprogn(body);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "Fprogn" is implicitly 
declared as a function.
at line number 84 in file DISK$WORK:[TEST.GCL.O]LET.C;1

        bds_unwind(old_bds_top);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bds_unwind" is 
implicitly declared as a function.
at line number 87 in file DISK$WORK:[TEST.GCL.O]LET.C;1

        if (endp(form))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 100 in file DISK$WORK:[TEST.GCL.O]LET.C;1

                FEerror("No argument to LET*.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 101 in file DISK$WORK:[TEST.GCL.O]LET.C;1

        Fprogn(body);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "Fprogn" is implicitly 
declared as a function.
at line number 113 in file DISK$WORK:[TEST.GCL.O]LET.C;1

        bds_unwind(old_bds_top);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bds_unwind" is 
implicitly declared as a function.
at line number 116 in file DISK$WORK:[TEST.GCL.O]LET.C;1

        if (endp(form))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 131 in file DISK$WORK:[TEST.GCL.O]LET.C;1

                FEerror("No argument to MULTIPLE-VALUE-BIND.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 132 in file DISK$WORK:[TEST.GCL.O]LET.C;1

        eval(values_form);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 143 in file DISK$WORK:[TEST.GCL.O]LET.C;1

                check_var(y);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_variable" is 
implicitly declared as a function.
at line number 150 in file DISK$WORK:[TEST.GCL.O]LET.C;1

                bind_var(start[i].bt_var,
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bind_var" is implicitly 
declared as a function.
at line number 161 in file DISK$WORK:[TEST.GCL.O]LET.C;1

        Fprogn(body);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "Fprogn" is implicitly 
declared as a function.
at line number 169 in file DISK$WORK:[TEST.GCL.O]LET.C;1

        bds_unwind(old_bds_top);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bds_unwind" is 
implicitly declared as a function.
at line number 171 in file DISK$WORK:[TEST.GCL.O]LET.C;1

        if (endp(form))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 184 in file DISK$WORK:[TEST.GCL.O]LET.C;1

                FEerror("No argument to COMPILER-LET.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 185 in file DISK$WORK:[TEST.GCL.O]LET.C;1

                eval_assign(bt->bt_init, bt->bt_init);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 197 in file DISK$WORK:[TEST.GCL.O]LET.C;1

                bind_var(bt->bt_var, bt->bt_init, Ct);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bind_var" is implicitly 
declared as a function.
at line number 200 in file DISK$WORK:[TEST.GCL.O]LET.C;1

        Fprogn(body);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "Fprogn" is implicitly 
declared as a function.
at line number 204 in file DISK$WORK:[TEST.GCL.O]LET.C;1

        bds_unwind(old_bds_top);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bds_unwind" is 
implicitly declared as a function.
at line number 207 in file DISK$WORK:[TEST.GCL.O]LET.C;1

        if (endp(args))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 221 in file DISK$WORK:[TEST.GCL.O]LET.C;1

                FEtoo_few_argumentsF(args);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 222 in file DISK$WORK:[TEST.GCL.O]LET.C;1

                        FEerror("~S~%\
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 229 in file DISK$WORK:[TEST.GCL.O]LET.C;1

                lex_fun_bind(MMcar(def), top[0]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "lex_fun_bind" is 
implicitly declared as a function.
at line number 236 in file DISK$WORK:[TEST.GCL.O]LET.C;1

        Fprogn(vs_head);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "Fprogn" is implicitly 
declared as a function.
at line number 240 in file DISK$WORK:[TEST.GCL.O]LET.C;1

        if (endp(args))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 257 in file DISK$WORK:[TEST.GCL.O]LET.C;1

                FEtoo_few_argumentsF(args);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 258 in file DISK$WORK:[TEST.GCL.O]LET.C;1

                        FEerror("~S~%\
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 265 in file DISK$WORK:[TEST.GCL.O]LET.C;1

                lex_fun_bind(MMcar(def), top[0]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "lex_fun_bind" is 
implicitly declared as a function.
at line number 273 in file DISK$WORK:[TEST.GCL.O]LET.C;1

        Fprogn(vs_head);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "Fprogn" is implicitly 
declared as a function.
at line number 282 in file DISK$WORK:[TEST.GCL.O]LET.C;1

        if (endp(args))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 297 in file DISK$WORK:[TEST.GCL.O]LET.C;1

                FEtoo_few_argumentsF(args);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 298 in file DISK$WORK:[TEST.GCL.O]LET.C;1

                        FEerror("~S~%\
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 305 in file DISK$WORK:[TEST.GCL.O]LET.C;1

                lex_macro_bind(MMcar(def), MMcaddr(top[0]));
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "lex_macro_bind" is 
implicitly declared as a function.
at line number 312 in file DISK$WORK:[TEST.GCL.O]LET.C;1

        Fprogn(vs_head);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "Fprogn" is implicitly 
declared as a function.
at line number 316 in file DISK$WORK:[TEST.GCL.O]LET.C;1
    SYS$DISK:[-.O]CONDITIONAL.C

        if (endp(form) || endp(MMcdr(form)))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 40 in file DISK$WORK:[TEST.GCL.O]CONDITIONAL.C;1

                FEtoo_few_argumentsF(form);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 41 in file DISK$WORK:[TEST.GCL.O]CONDITIONAL.C;1

                FEtoo_many_argumentsF(form);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_many_argumentsF" 
is implicitly declared as a function.
at line number 43 in file DISK$WORK:[TEST.GCL.O]CONDITIONAL.C;1

        eval(MMcar(form));
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 44 in file DISK$WORK:[TEST.GCL.O]CONDITIONAL.C;1

        while (!endp(args)) {
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 68 in file DISK$WORK:[TEST.GCL.O]CONDITIONAL.C;1

                        FEerror("~S is an illegal COND clause.",1,clause);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 71 in file DISK$WORK:[TEST.GCL.O]CONDITIONAL.C;1

                eval(MMcar(clause));
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 72 in file DISK$WORK:[TEST.GCL.O]CONDITIONAL.C;1

        if (endp(arg))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 103 in file DISK$WORK:[TEST.GCL.O]CONDITIONAL.C;1

                FEtoo_few_argumentsF(arg);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 104 in file DISK$WORK:[TEST.GCL.O]CONDITIONAL.C;1

        eval(MMcar(arg));
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 105 in file DISK$WORK:[TEST.GCL.O]CONDITIONAL.C;1

                        FEerror("~S is an illegal CASE clause.",1,clause);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 112 in file DISK$WORK:[TEST.GCL.O]CONDITIONAL.C;1

        if (endp(form))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 151 in file DISK$WORK:[TEST.GCL.O]CONDITIONAL.C;1

                FEtoo_few_argumentsF(form);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 152 in file DISK$WORK:[TEST.GCL.O]CONDITIONAL.C;1

        eval(MMcar(form));
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 153 in file DISK$WORK:[TEST.GCL.O]CONDITIONAL.C;1

        if (endp(form))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 178 in file DISK$WORK:[TEST.GCL.O]CONDITIONAL.C;1

                FEtoo_few_argumentsF(form);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 179 in file DISK$WORK:[TEST.GCL.O]CONDITIONAL.C;1

        eval(MMcar(form));
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 180 in file DISK$WORK:[TEST.GCL.O]CONDITIONAL.C;1
    SYS$DISK:[-.O]BLOCK.C

        if(endp(args))
...........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 41 in file DISK$WORK:[TEST.GCL.O]BLOCK.C;1

                FEtoo_few_argumentsF(args);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 42 in file DISK$WORK:[TEST.GCL.O]BLOCK.C;1

        lex_block_bind(MMcar(args), id);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "lex_block_bind" is 
implicitly declared as a function.
at line number 46 in file DISK$WORK:[TEST.GCL.O]BLOCK.C;1

        frs_push(FRS_CATCH, id);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "frs_overflow" is 
implicitly declared as a function.
at line number 48 in file DISK$WORK:[TEST.GCL.O]BLOCK.C;1

                                eval(MMcar(body));
................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 60 in file DISK$WORK:[TEST.GCL.O]BLOCK.C;1

        if (endp(args))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 76 in file DISK$WORK:[TEST.GCL.O]BLOCK.C;1

                FEtoo_few_argumentsF(args);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 77 in file DISK$WORK:[TEST.GCL.O]BLOCK.C;1

                FEtoo_many_argumentsF(args);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_many_argumentsF" 
is implicitly declared as a function.
at line number 79 in file DISK$WORK:[TEST.GCL.O]BLOCK.C;1

                FEerror("The block name ~S is undefined.", 1, MMcar(args));
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 82 in file DISK$WORK:[TEST.GCL.O]BLOCK.C;1

                eval(MMcadr(args));
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 91 in file DISK$WORK:[TEST.GCL.O]BLOCK.C;1

        unwind(fr, MMcaddr(lex_block));
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "unwind" is implicitly 
declared as a function.
at line number 92 in file DISK$WORK:[TEST.GCL.O]BLOCK.C;1

        if(!endp(args) && !endp(MMcdr(args)))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 103 in file DISK$WORK:[TEST.GCL.O]BLOCK.C;1

                FEtoo_many_argumentsF(args);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_many_argumentsF" 
is implicitly declared as a function.
at line number 104 in file DISK$WORK:[TEST.GCL.O]BLOCK.C;1

                FEerror("The block name ~S is undefined.", 1, Cnil);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 107 in file DISK$WORK:[TEST.GCL.O]BLOCK.C;1

                eval(MMcar(args));
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 115 in file DISK$WORK:[TEST.GCL.O]BLOCK.C;1

        unwind(fr, MMcaddr(lex_block));
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "unwind" is implicitly 
declared as a function.
at line number 116 in file DISK$WORK:[TEST.GCL.O]BLOCK.C;1
    SYS$DISK:[-.O]ITERATION.C

        make_nil_block();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "lex_block_bind" is 
implicitly declared as a function.
at line number 40 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        make_nil_block();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "frs_overflow" is 
implicitly declared as a function.
at line number 40 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        for(x = form; !endp(x); x = MMcdr(x)) {
.......................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 51 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

                eval(MMcar(x));
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 53 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

                eval(MMcar(x));
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 59 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        for (is = var_list;  !endp(is);  is = MMcdr(is)) {
..............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 91 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

                        FEinvalid_form("The index, ~S, is illegal.", x);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEinvalid_form" is 
implicitly declared as a function.
at line number 102 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

                check_var(y);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_variable" is 
implicitly declared as a function.
at line number 104 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

                                    FEerror("Too many forms to the index ~S.",
....................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 119 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        if (endp(arg) || endp(MMcdr(arg)))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 138 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

                FEtoo_few_argumentsF(arg);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 139 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

                FEinvalid_form("The DO end-test, ~S, is illegal.",
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEinvalid_form" is 
implicitly declared as a function.
at line number 141 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        make_nil_block();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "lex_block_bind" is 
implicitly declared as a function.
at line number 147 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        make_nil_block();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "frs_overflow" is 
implicitly declared as a function.
at line number 147 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        eval(end_test);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 171 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        Ftagbody(body);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "Ftagbody" is implicitly 
declared as a function.
at line number 188 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        bds_unwind(old_bds_top);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bds_unwind" is 
implicitly declared as a function.
at line number 206 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        if (endp(arg) || endp(MMcdr(arg)))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 223 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

                FEtoo_few_argumentsF(arg);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 224 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

                FEinvalid_form("The DO* end-test, ~S, is illegal.",
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEinvalid_form" is 
implicitly declared as a function.
at line number 226 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        make_nil_block();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "lex_block_bind" is 
implicitly declared as a function.
at line number 232 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        make_nil_block();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "frs_overflow" is 
implicitly declared as a function.
at line number 232 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        eval(end_test);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 254 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        Ftagbody(body);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "Ftagbody" is implicitly 
declared as a function.
at line number 271 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        bds_unwind(old_bds_top);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bds_unwind" is 
implicitly declared as a function.
at line number 285 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        if (endp(arg))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 302 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

                FEtoo_few_argumentsF(arg);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 303 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

                FEerror("No variable.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 307 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        make_nil_block();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "lex_block_bind" is 
implicitly declared as a function.
at line number 326 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        make_nil_block();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "frs_overflow" is 
implicitly declared as a function.
at line number 326 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        eval_assign(start->bt_init, listform);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 333 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        bind_var(start->bt_var, Cnil, start->bt_spp);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bind_var" is implicitly 
declared as a function.
at line number 336 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

                eval(result);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 350 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        Ftagbody(body);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "Ftagbody" is implicitly 
declared as a function.
at line number 362 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        bds_unwind(old_bds_top);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bds_unwind" is 
implicitly declared as a function.
at line number 367 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        if (endp(arg))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 384 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

                FEtoo_few_argumentsF(arg);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 385 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

                FEerror("No variable.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 389 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        make_nil_block();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "lex_block_bind" is 
implicitly declared as a function.
at line number 408 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        make_nil_block();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "frs_overflow" is 
implicitly declared as a function.
at line number 408 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        eval_assign(start->bt_init, countform);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 415 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

                FEwrong_type_argument(sLinteger, start->bt_init);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 418 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        bind_var(start->bt_var, make_fixnum(0), start->bt_spp);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bind_var" is implicitly 
declared as a function.
at line number 421 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        if (number_compare(x, start->bt_init) >= 0) {
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_compare" is 
implicitly declared as a function.
at line number 434 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

                eval(result);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 435 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        Ftagbody(body);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "Ftagbody" is implicitly 
declared as a function.
at line number 441 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1

        bds_unwind(old_bds_top);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bds_unwind" is 
implicitly declared as a function.
at line number 451 in file DISK$WORK:[TEST.GCL.O]ITERATION.C;1
    SYS$DISK:[-.O]MAPFUN.C

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 63 in file DISK$WORK:[TEST.GCL.O]MAPFUN.C;1

                if (endp(x)) {
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 67 in file DISK$WORK:[TEST.GCL.O]MAPFUN.C;1

        super_funcall(base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "super_funcall" is 
implicitly declared as a function.
at line number 79 in file DISK$WORK:[TEST.GCL.O]MAPFUN.C;1

                if (endp(x)) {
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 83 in file DISK$WORK:[TEST.GCL.O]MAPFUN.C;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 107 in file DISK$WORK:[TEST.GCL.O]MAPFUN.C;1

                if (endp(x)) {
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 111 in file DISK$WORK:[TEST.GCL.O]MAPFUN.C;1

        super_funcall(base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "super_funcall" is 
implicitly declared as a function.
at line number 123 in file DISK$WORK:[TEST.GCL.O]MAPFUN.C;1

                if (endp(x)) {
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 127 in file DISK$WORK:[TEST.GCL.O]MAPFUN.C;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 151 in file DISK$WORK:[TEST.GCL.O]MAPFUN.C;1

                if (endp(x)) {
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 155 in file DISK$WORK:[TEST.GCL.O]MAPFUN.C;1

        super_funcall(base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "super_funcall" is 
implicitly declared as a function.
at line number 165 in file DISK$WORK:[TEST.GCL.O]MAPFUN.C;1

                if (endp(x)) {
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 168 in file DISK$WORK:[TEST.GCL.O]MAPFUN.C;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 191 in file DISK$WORK:[TEST.GCL.O]MAPFUN.C;1

                if (endp(x)) {
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 195 in file DISK$WORK:[TEST.GCL.O]MAPFUN.C;1

        super_funcall(base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "super_funcall" is 
implicitly declared as a function.
at line number 205 in file DISK$WORK:[TEST.GCL.O]MAPFUN.C;1

                if (endp(x)) {
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 208 in file DISK$WORK:[TEST.GCL.O]MAPFUN.C;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 231 in file DISK$WORK:[TEST.GCL.O]MAPFUN.C;1

                if (endp(x)) {
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 235 in file DISK$WORK:[TEST.GCL.O]MAPFUN.C;1

        super_funcall(base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "super_funcall" is 
implicitly declared as a function.
at line number 247 in file DISK$WORK:[TEST.GCL.O]MAPFUN.C;1

        if (endp(handy)) handy = top[0] = vs_base[0];
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 248 in file DISK$WORK:[TEST.GCL.O]MAPFUN.C;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 282 in file DISK$WORK:[TEST.GCL.O]MAPFUN.C;1

                if (endp(x)) {
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 286 in file DISK$WORK:[TEST.GCL.O]MAPFUN.C;1

        super_funcall(base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "super_funcall" is 
implicitly declared as a function.
at line number 298 in file DISK$WORK:[TEST.GCL.O]MAPFUN.C;1

        if (endp(handy))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 299 in file DISK$WORK:[TEST.GCL.O]MAPFUN.C;1
    SYS$DISK:[-.O]PROG.C

        while (!endp(body)) {
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 65 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

                        lex_tag_bind(label, id);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "lex_tag_bind" is 
implicitly declared as a function.
at line number 70 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

        frs_push(FRS_CATCH, id);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "frs_overflow" is 
implicitly declared as a function.
at line number 79 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

                        FEerror("Someone tried to RETURN-FROM a TAGBODY.",0);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 89 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

                        eval(MMcar(body));
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 97 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

        if (endp(arg))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 117 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

                FEtoo_few_argumentsF(arg);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 118 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

        make_nil_block();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "lex_block_bind" is 
implicitly declared as a function.
at line number 120 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

        make_nil_block();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "frs_overflow" is 
implicitly declared as a function.
at line number 120 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

        let_var_list(arg->c.c_car);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "let_var_list" is 
implicitly declared as a function.
at line number 128 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

        bds_unwind(old_bds_top);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bds_unwind" is 
implicitly declared as a function.
at line number 136 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

        if (endp(arg))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 152 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

                FEtoo_few_argumentsF(arg);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 153 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

        make_nil_block();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "lex_block_bind" is 
implicitly declared as a function.
at line number 155 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

        make_nil_block();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "frs_overflow" is 
implicitly declared as a function.
at line number 155 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

        let_var_list(arg->c.c_car);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "let_var_list" is 
implicitly declared as a function.
at line number 163 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

        bds_unwind(old_bds_top);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bds_unwind" is 
implicitly declared as a function.
at line number 171 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

        if (endp(args))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 183 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

                FEtoo_few_argumentsF(args);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 184 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

                FEtoo_many_argumentsF(args);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_many_argumentsF" 
is implicitly declared as a function.
at line number 186 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

                FEerror("~S is an undefined tag.", 1, MMcar(args));
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 189 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

        unwind(fr,vs_top[-1]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "unwind" is implicitly 
declared as a function.
at line number 195 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

        if (endp(args) || endp(MMcdr(args)))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 210 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

                FEtoo_few_argumentsF(args);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 211 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

        eval(MMcar(args));
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 216 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

                if (type_of(var)!=t_symbol) not_a_symbol(var);
............................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 227 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

                        FEerror("Cannot bind the constant ~S.", 1, var);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 229 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

        Fprogn(MMcddr(args));
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "Fprogn" is implicitly 
declared as a function.
at line number 240 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

        bds_unwind(old_bds_top);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bds_unwind" is 
implicitly declared as a function.
at line number 242 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

        if(endp(body)) {
...........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 250 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

                        eval(MMcar(body));
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 257 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

        if(endp(arg))
...........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 270 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

                FEtoo_few_argumentsF(arg);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 271 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

        eval(MMcar(arg));
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 272 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

        if(endp(arg) || endp(MMcdr(arg)))
...........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 288 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

                FEtoo_few_argumentsF(arg);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 289 in file DISK$WORK:[TEST.GCL.O]PROG.C;1

        eval(MMcar(arg));
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 290 in file DISK$WORK:[TEST.GCL.O]PROG.C;1
    SYS$DISK:[-.O]MULTIVAL.C

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 42 in file DISK$WORK:[TEST.GCL.O]MULTIVAL.C;1

        while (!endp(list)) {   
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 45 in file DISK$WORK:[TEST.GCL.O]MULTIVAL.C;1

        if (endp(form))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 59 in file DISK$WORK:[TEST.GCL.O]MULTIVAL.C;1

                FEtoo_few_argumentsF(form);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 60 in file DISK$WORK:[TEST.GCL.O]MULTIVAL.C;1

                FEtoo_many_argumentsF(form);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_many_argumentsF" 
is implicitly declared as a function.
at line number 62 in file DISK$WORK:[TEST.GCL.O]MULTIVAL.C;1

        eval(MMcar(form));
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 64 in file DISK$WORK:[TEST.GCL.O]MULTIVAL.C;1

        if (endp(form))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 82 in file DISK$WORK:[TEST.GCL.O]MULTIVAL.C;1

                FEtoo_few_argumentsF(form);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 83 in file DISK$WORK:[TEST.GCL.O]MULTIVAL.C;1

        eval(MMcar(form));
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 84 in file DISK$WORK:[TEST.GCL.O]MULTIVAL.C;1

        super_funcall(top[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "super_funcall" is 
implicitly declared as a function.
at line number 100 in file DISK$WORK:[TEST.GCL.O]MULTIVAL.C;1

        if (endp(forms))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 111 in file DISK$WORK:[TEST.GCL.O]MULTIVAL.C;1

                FEtoo_few_argumentsF(forms);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 112 in file DISK$WORK:[TEST.GCL.O]MULTIVAL.C;1

        eval(MMcar(forms));
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 113 in file DISK$WORK:[TEST.GCL.O]MULTIVAL.C;1
    SYS$DISK:[-.O]CATCH.C

        if (endp(args))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 39 in file DISK$WORK:[TEST.GCL.O]CATCH.C;1

                FEtoo_few_argumentsF(args);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 40 in file DISK$WORK:[TEST.GCL.O]CATCH.C;1

        eval(MMcar(args));
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 41 in file DISK$WORK:[TEST.GCL.O]CATCH.C;1

        frs_push(FRS_CATCH, vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "frs_overflow" is 
implicitly declared as a function.
at line number 44 in file DISK$WORK:[TEST.GCL.O]CATCH.C;1

                Fprogn(MMcdr(args));
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "Fprogn" is implicitly 
declared as a function.
at line number 48 in file DISK$WORK:[TEST.GCL.O]CATCH.C;1

DEFUNO("ERROR-SET",object,fSerror_set,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 52 in file DISK$WORK:[TEST.GCL.O]CATCH.C;1

        frs_push(FRS_CATCHALL, Cnil);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "frs_overflow" is 
implicitly declared as a function.
at line number 69 in file DISK$WORK:[TEST.GCL.O]CATCH.C;1

        if (endp(args))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 101 in file DISK$WORK:[TEST.GCL.O]CATCH.C;1

                FEtoo_few_argumentsF(args);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 102 in file DISK$WORK:[TEST.GCL.O]CATCH.C;1

        frs_push(FRS_PROTECT, Cnil);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "frs_overflow" is 
implicitly declared as a function.
at line number 103 in file DISK$WORK:[TEST.GCL.O]CATCH.C;1

                Fprogn(MMcdr(args));
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "Fprogn" is implicitly 
declared as a function.
at line number 118 in file DISK$WORK:[TEST.GCL.O]CATCH.C;1

                unwind(fr, tag);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "unwind" is implicitly 
declared as a function.
at line number 122 in file DISK$WORK:[TEST.GCL.O]CATCH.C;1

                eval(MMcar(args));
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 125 in file DISK$WORK:[TEST.GCL.O]CATCH.C;1

                Fprogn(MMcdr(args));
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "Fprogn" is implicitly 
declared as a function.
at line number 134 in file DISK$WORK:[TEST.GCL.O]CATCH.C;1

        if (endp(args) || endp(MMcdr(args)))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 149 in file DISK$WORK:[TEST.GCL.O]CATCH.C;1

                FEtoo_few_argumentsF(args);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 150 in file DISK$WORK:[TEST.GCL.O]CATCH.C;1

                FEtoo_many_argumentsF(args);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_many_argumentsF" 
is implicitly declared as a function.
at line number 152 in file DISK$WORK:[TEST.GCL.O]CATCH.C;1

        eval(MMcar(args));
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 153 in file DISK$WORK:[TEST.GCL.O]CATCH.C;1

                FEerror("~S is an undefined tag.", 1, tag);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 159 in file DISK$WORK:[TEST.GCL.O]CATCH.C;1

        unwind(fr, tag);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "unwind" is implicitly 
declared as a function.
at line number 161 in file DISK$WORK:[TEST.GCL.O]CATCH.C;1
    SYS$DISK:[-.O]SYMBOL.C

        j = pack_hash(string_register);
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "pack_hash" is implicitly 
declared as a function.
at line number 84 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

                if (string_eq(l->c.c_car, string_register))
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "string_eq" is implicitly 
declared as a function.
at line number 87 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        j = pack_hash(string_register);
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "pack_hash" is implicitly 
declared as a function.
at line number 149 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

                if (string_eq(l->c.c_car, string_register))
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "string_eq" is implicitly 
declared as a function.
at line number 152 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        j = pack_hash(string_register);
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "pack_hash" is implicitly 
declared as a function.
at line number 214 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

                if (string_eq(l->c.c_car, string_register))
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "string_eq" is implicitly 
declared as a function.
at line number 217 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

                FEunbound_variable(s);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEunbound_variable" is 
implicitly declared as a function.
at line number 239 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        FEerror("Bad plist ~a",1,place);        
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 257 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

                not_a_symbol(s);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 265 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        if(l!=Cnil) FEerror("Bad plist ~a",1,p);
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 290 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

                not_a_symbol(s);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 303 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

                not_a_symbol(s);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 315 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        for(;  !endp(*p);  p = &(*p)->c.c_cdr->c.c_cdr) {
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 338 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

                        odd_plist(l0);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "odd_plist" is implicitly 
declared as a function.
at line number 340 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

                not_a_symbol(s);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 354 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 387 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 393 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        check_type_symbol(&sym);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_symbol" is 
implicitly declared as a function.
at line number 380 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 386 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        check_type_symbol(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_symbol" is 
implicitly declared as a function.
at line number 388 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 398 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        check_type_symbol(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_symbol" is 
implicitly declared as a function.
at line number 400 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 413 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 419 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 419 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        for (l = place;  !endp(l);  l = l->c.c_cdr->c.c_cdr) {
..........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 414 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

                        odd_plist(place);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "odd_plist" is implicitly 
declared as a function.
at line number 416 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

 if (type_of(x)!=t_symbol) FEerror("Takes a symbol ~a",1,x);
...........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 432 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 453 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 459 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        check_type_string(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_string" is 
implicitly declared as a function.
at line number 461 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 474 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 480 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        check_type_symbol(&sym);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_symbol" is 
implicitly declared as a function.
at line number 467 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 488 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 494 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

                check_type_non_negative_integer(&x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"check_type_non_negative_integer" is implicitly declared as a function.
at line number 485 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 526 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 536 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        check_type_string(&prefix);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_string" is 
implicitly declared as a function.
at line number 519 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        check_type_package(&pack);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_package" is 
implicitly declared as a function.
at line number 520 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 551 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        check_type_symbol(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_symbol" is 
implicitly declared as a function.
at line number 553 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 559 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        check_arg(3);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 574 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 593 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 603 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        check_type_symbol(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_symbol" is 
implicitly declared as a function.
at line number 605 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        check_arg(3);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 613 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        check_type_symbol(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_symbol" is 
implicitly declared as a function.
at line number 615 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1

        FEerror("The length of the property-list ~S is odd.", 1, place);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 626 in file DISK$WORK:[TEST.GCL.O]SYMBOL.D;1
    SYS$DISK:[-.O]CFUN.C

          else if(size) FEerror("Bad call to make_cfun",0);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 51 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1

          else if(size) FEerror("Bad call to make_cclosure",0);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 115 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1

DEFUNO("MC",object,fSmc,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 121 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1

  dcheck_type(name,t_symbol);
..^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type" is 
implicitly declared as a function.
at line number 125 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1

 if (type_of(sym)!=t_symbol) not_a_symbol(sym);
.............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 138 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1

object
^
%CC-W-MISSINGRETURN, Non-void function "MFsfun" does not contain a return 
statement.
at line number 133 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1

DEFUNO("MFSFUN",object,fSmfsfun,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 147 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1

  dcheck_type(address,t_fixnum);
..^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type" is 
implicitly declared as a function.
at line number 151 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1

 if (type_of(sym)!=t_symbol) not_a_symbol(sym);
.............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 161 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1

 dcheck_type(data,t_cfdata);
.^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type" is 
implicitly declared as a function.
at line number 164 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1

object
^
%CC-W-MISSINGRETURN, Non-void function "MFvfun" does not contain a return 
statement.
at line number 156 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1

DEFUNO("MFVFUN",object,fSmfvfun,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 171 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1

{if (data) set_key_struct(keys,data);
...........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "set_key_struct" is 
implicitly declared as a function.
at line number 186 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1

DEFUNO("MFVFUN-KEY",object,fSmfvfun_key,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 190 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1

                not_a_symbol(sym);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 206 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1

object MFnew(sym,self,data)
^
%CC-W-MISSINGRETURN, Non-void function "MFnew" does not contain a return 
statement.
at line number 199 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1

DEFUNO("MF",object,fSmf,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 218 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1

          else if(size) FEerror("Bad call to make_cfun",0);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 237 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1

                not_a_symbol(sym);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 252 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1

object
^
%CC-W-MISSINGRETURN, Non-void function "MM" does not contain a return statement.
at line number 241 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1

DEFUNO("MM",object,fSmm,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 266 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1

DEFUNO("COMPILED-FUNCTION-NAME",object,fScompiled_function_name,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 349 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1

          FEerror("~S is not a compiled-function.", 1, fun);
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 365 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1

     for (n = 0, l = fun->cc.cc_env;  !endp(l);  n++, l = l->c.c_cdr);
.......................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 378 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1

DEFUNO("TURBO-CLOSURE",object,fSturbo_closure,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 389 in file DISK$WORK:[TEST.GCL.O]CFUN.C;1
%LIBRAR-W-COMCOD, compilation warnings in module CFUN file 
DISK$WORK:[TEST.GCL.O]CFUN-AXP.OBJ;1
    SYS$DISK:[-.O]CMPAUX.C

DEFUNO("SPECIALP",object,fSspecialp,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 33 in file DISK$WORK:[TEST.GCL.O]CMPAUX.C;1

DEFUNO("DEFVAR1",object,fSdefvar1,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 48 in file DISK$WORK:[TEST.GCL.O]CMPAUX.C;1

        CHECK_ARG_RANGE(2,3);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_range" is 
implicitly declared as a function.
at line number 61 in file DISK$WORK:[TEST.GCL.O]CMPAUX.C;1

DEFUNO("DEBUG",object,fSdebug,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 71 in file DISK$WORK:[TEST.GCL.O]CMPAUX.C;1

DEFUNO("SETVV",object,fSsetvv,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 80 in file DISK$WORK:[TEST.GCL.O]CMPAUX.C;1

  else FEerror("setvv called outside %init",0);
.......^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 86 in file DISK$WORK:[TEST.GCL.O]CMPAUX.C;1

                FEerror("Zero divizor", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 109 in file DISK$WORK:[TEST.GCL.O]CMPAUX.C;1

{set_VV(VV,n,data);
.^
%CC-I-IMPLICITFUNC, In this statement, the identifier "set_VV" is implicitly 
declared as a function.
at line number 133 in file DISK$WORK:[TEST.GCL.O]CMPAUX.C;1

          Llogand();
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "Llogand" is implicitly 
declared as a function.
at line number 169 in file DISK$WORK:[TEST.GCL.O]CMPAUX.C;1

                FEerror("~S cannot be coerce to a C char.", 1, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 178 in file DISK$WORK:[TEST.GCL.O]CMPAUX.C;1

                FEerror("~S cannot be coerce to a C int.", 1, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 204 in file DISK$WORK:[TEST.GCL.O]CMPAUX.C;1

                FEerror("~S cannot be coerce to a C float.", 1, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 228 in file DISK$WORK:[TEST.GCL.O]CMPAUX.C;1

                FEerror("~S cannot be coerce to a C double.", 1, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 252 in file DISK$WORK:[TEST.GCL.O]CMPAUX.C;1

  if (type_of(x)!=t_string) FEwrong_type_argument(sLstring,x);
............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 267 in file DISK$WORK:[TEST.GCL.O]CMPAUX.C;1

  check_type(fasl_vec,t_vector);
..^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type" is 
implicitly declared as a function.
at line number 303 in file DISK$WORK:[TEST.GCL.O]CMPAUX.C;1

  check_type(fasl_vec,t_vector);
..^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type" is 
implicitly declared as a function.
at line number 350 in file DISK$WORK:[TEST.GCL.O]CMPAUX.C;1

       eval(form->v.v_self[i]);
.......^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 387 in file DISK$WORK:[TEST.GCL.O]CMPAUX.C;1

  {printf("loading %s\n",file); fflush(stdout);  load(file);}
.................................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "load" is implicitly 
declared as a function.
at line number 436 in file DISK$WORK:[TEST.GCL.O]CMPAUX.C;1
    SYS$DISK:[-.O]PACKAGE.C

                if (string_equal(x, l->c.c_car))
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "string_equal" is 
implicitly declared as a function.
at line number 46 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

          {int j =pack_hash(l->c.c_car)%m;
..................^
%CC-I-IMPLICITFUNC, In the initializer for j, the identifier "pack_hash" is 
implicitly declared as a function.
at line number 67 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                package_already(n);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "package_already" is 
implicitly declared as a function.
at line number 112 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        for (;  !endp(ns);  ns = ns->c.c_cdr) {
.................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 127 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                                no_package(ul->c.c_car);
................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "no_package" is 
implicitly declared as a function.
at line number 146 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        for (;  !endp(ns);  ns = ns->c.c_cdr) {
.................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 184 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                        package_already(n);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "package_already" is 
implicitly declared as a function.
at line number 195 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                use_package(ul->c.c_car, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "use_package" is 
implicitly declared as a function.
at line number 199 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                package_already(n);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "package_already" is 
implicitly declared as a function.
at line number 222 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        for (;  !endp(ns);  ns = ns->c.c_cdr) {
.................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 225 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                FEwrong_type_argument(TSor_string_symbol, n);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 257 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                if (string_equal(p->p_name, n))
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "string_equal" is 
implicitly declared as a function.
at line number 259 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                no_package(p);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "no_package" is 
implicitly declared as a function.
at line number 277 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                FEerror("The value of *PACKAGE*, ~S, was not a package.",
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 289 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                if (string_eq(l->c.c_car, st)) {
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bcmp" is implicitly 
declared as a function.
at line number 353 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                if (string_eq(l->c.c_car, st)) {
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bcmp" is implicitly 
declared as a function.
at line number 405 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                if (member_eq(s, p->p.p_shadowings))
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "member_eq" is implicitly 
declared as a function.
at line number 438 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                if (member_eq(s, p->p.p_shadowings))
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "member_eq" is implicitly 
declared as a function.
at line number 444 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

FEerror("Cannot unintern the shadowing symbol ~S~%\
^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 458 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        delete_eq(s, &p->p.p_shadowings);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "delete_eq" is implicitly 
declared as a function.
at line number 464 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                        import(s, p);   /*  signals an error  */
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "import" is implicitly 
declared as a function.
at line number 488 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                FEerror("The symbol ~S is not accessible from ~S.", 2,
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 496 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                    !member_eq(x, l->c.c_car->p.p_shadowings))
.....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "member_eq" is implicitly 
declared as a function.
at line number 503 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                {delete_eq(s, ip);
.................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "delete_eq" is implicitly 
declared as a function.
at line number 510 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                FEerror("Cannot unexport a symbol from the keyword.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 524 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        delete_eq(s, ep);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "delete_eq" is implicitly 
declared as a function.
at line number 533 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

FEerror("Cannot import the symbol ~S~%\
^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 549 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                        if (!member_eq(x, p->p.p_shadowings))
.............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "member_eq" is implicitly 
declared as a function.
at line number 570 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                if(member_eq(x, p->p.p_shadowings))
...................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "member_eq" is implicitly 
declared as a function.
at line number 575 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                        delete_eq(x, &p->p.p_shadowings);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "delete_eq" is implicitly 
declared as a function.
at line number 576 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                        no_package(x0);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "no_package" is 
implicitly declared as a function.
at line number 621 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                FEerror("Cannot use keyword package.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 624 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        if (member_eq(x, p->p.p_uselist))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "member_eq" is implicitly 
declared as a function.
at line number 627 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                        no_package(x0);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "no_package" is 
implicitly declared as a function.
at line number 654 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        delete_eq(x, &p->p.p_uselist);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "delete_eq" is implicitly 
declared as a function.
at line number 656 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 676 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        parse_key(vs_base+1+0,FALSE, FALSE, 4,
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "parse_key" is implicitly 
declared as a function.
at line number 677 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        check_type_or_string_symbol(&pack_name);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"check_type_or_string_symbol" is implicitly declared as a function.
at line number 667 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 687 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        parse_key(vs_base+1+0,FALSE, FALSE, 4,
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "parse_key" is implicitly 
declared as a function.
at line number 688 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        check_type_or_string_symbol(&pack_name);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"check_type_or_string_symbol" is implicitly declared as a function.
at line number 677 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 685 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 692 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        check_type_package(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_package" is 
implicitly declared as a function.
at line number 694 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 700 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 716 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 722 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        check_type_or_string_symbol(&new_name);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"check_type_or_string_symbol" is implicitly declared as a function.
at line number 711 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 717 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 726 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 735 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        check_arg(0);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 747 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                stack_cons();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "stack_cons" is 
implicitly declared as a function.
at line number 752 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 764 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 770 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        check_type_string(&strng);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_string" is 
implicitly declared as a function.
at line number 757 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 779 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 785 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        check_type_string(&strng);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_string" is 
implicitly declared as a function.
at line number 773 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 795 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 801 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        check_type_symbol(&symbl);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_symbol" is 
implicitly declared as a function.
at line number 789 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 809 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 815 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                for (l = symbols;  !endp(l);  l = l->c.c_cdr)
....................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 814 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                check_type_symbol(&symbols);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_symbol" is 
implicitly declared as a function.
at line number 819 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 836 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 842 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                for (l = symbols;  !endp(l);  l = l->c.c_cdr)
....................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 841 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                check_type_symbol(&symbols);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_symbol" is 
implicitly declared as a function.
at line number 846 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 862 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 868 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                for (l = symbols;  !endp(l);  l = l->c.c_cdr)
....................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 867 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                check_type_symbol(&symbols);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_symbol" is 
implicitly declared as a function.
at line number 872 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 888 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 894 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                for (l = symbols;  !endp(l);  l = l->c.c_cdr)
....................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 893 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                check_type_symbol(&symbols);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_symbol" is 
implicitly declared as a function.
at line number 898 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 914 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 920 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                for (l = symbols;  !endp(l);  l = l->c.c_cdr)
....................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 919 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                check_type_symbol(&symbols);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_symbol" is 
implicitly declared as a function.
at line number 924 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 940 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 946 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                for (l = pack;  !endp(l);  l = l->c.c_cdr)
.................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 948 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                check_type_package(&pack);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_package" is 
implicitly declared as a function.
at line number 953 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 969 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 975 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                for (l = pack;  !endp(l);  l = l->c.c_cdr)
.................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 977 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                check_type_package(&pack);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_package" is 
implicitly declared as a function.
at line number 982 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 993 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        check_type_package(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_package" is 
implicitly declared as a function.
at line number 994 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                FEerror("~S is an illgal index to a package hashtable.",
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 997 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 1007 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        check_type_package(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_package" is 
implicitly declared as a function.
at line number 1008 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

                FEerror("~S is an illegal index to a package hashtable.",
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 1011 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        FEerror("There is no package with the name ~A.", 1, n);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 1020 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

        FEerror("A package with the name ~A already exists.", 1, n);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 1026 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

 check_type_package(&p);
.^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_package" is 
implicitly declared as a function.
at line number 1033 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1

 check_arg(1);
.^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 1034 in file DISK$WORK:[TEST.GCL.O]PACKAGE.D;1
    SYS$DISK:[-.O]BIG.C

  if(type_of(big)!=t_bignum) FEerror("Not a bignum",0);
.............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 55 in file DISK$WORK:[TEST.GCL.O]GMP_BIG.C;1

  if(type_of(big)!=t_bignum) FEerror("Not a bignum",0);
.............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 65 in file DISK$WORK:[TEST.GCL.O]GMP_BIG.C;1

   FEerror("bad mp",0);
...^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 78 in file DISK$WORK:[TEST.GCL.O]GMP_BIG.C;1

  if (MP_SELF(big_gcprotect)) abort();
..............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 14 in file DISK$WORK:[TEST.GCL.O]GMP.C;1

  bcopy(MP_SELF(big_gcprotect),new,oldsize);
..^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bcopy" is implicitly 
declared as a function.
at line number 19 in file DISK$WORK:[TEST.GCL.O]GMP.C;1

  if (inheap(oldmem)) insert_contblock(oldmem,oldsize);
......................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "insert_contblock" is 
implicitly declared as a function.
at line number 21 in file DISK$WORK:[TEST.GCL.O]GMP.C;1

 memcpy(MP(ans)->_mp_d,GC_PROTECTED_SELF,size*MP_LIMB_SIZE);
.^
%CC-I-IMPLICITFUNC, In this statement, the identifier "memcpy" is implicitly 
declared as a function.
at line number 149 in file DISK$WORK:[TEST.GCL.O]GMP_BIG.C;1

  else FEerror("bignum expected",0);
.......^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 335 in file DISK$WORK:[TEST.GCL.O]GMP_BIG.C;1

  ans->ust.ust_self=p=alloc_relblock(ans->ust.ust_dim);
..^
%CC-W-PTRMISMATCH, In this statement, the referenced type of the pointer value 
"p=alloc_relblock(...)" is "char", which is not compatible with "unsigned char".
at line number 419 in file DISK$WORK:[TEST.GCL.O]GMP_BIG.C;1
%LIBRAR-W-COMCOD, compilation warnings in module BIG file 
DISK$WORK:[TEST.GCL.O]BIG-AXP.OBJ;1
    SYS$DISK:[-.O]NUMBER.C

                FEerror("~S is not a fixnum.", 1, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 38 in file DISK$WORK:[TEST.GCL.O]NUMBER.C;1

                FEerror("~S is not a non-negative fixnum.", 1, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 47 in file DISK$WORK:[TEST.GCL.O]NUMBER.C;1

  if (min <= max); else {FEerror("Need Min < Max",0);}
.........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 61 in file DISK$WORK:[TEST.GCL.O]NUMBER.C;1

  bigger_fixnum_table= (void *) malloc(sizeof(struct fixnum_struct)*
................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "malloc" is implicitly 
declared as a function.
at line number 62 in file DISK$WORK:[TEST.GCL.O]NUMBER.C;1

        if (number_zerop(den))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_zerop" is 
implicitly declared as a function.
at line number 107 in file DISK$WORK:[TEST.GCL.O]NUMBER.C;1

                FEerror("Zero denominator.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 108 in file DISK$WORK:[TEST.GCL.O]NUMBER.C;1

        if (number_minusp(den)) {
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_minusp" is 
implicitly declared as a function.
at line number 113 in file DISK$WORK:[TEST.GCL.O]NUMBER.C;1

        init_big();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_big" is implicitly 
declared as a function.
at line number 276 in file DISK$WORK:[TEST.GCL.O]NUMBER.C;1

        init_num_pred();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_num_pred" is 
implicitly declared as a function.
at line number 277 in file DISK$WORK:[TEST.GCL.O]NUMBER.C;1

        init_num_comp();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_num_comp" is 
implicitly declared as a function.
at line number 278 in file DISK$WORK:[TEST.GCL.O]NUMBER.C;1

        init_num_arith();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_num_arith" is 
implicitly declared as a function.
at line number 279 in file DISK$WORK:[TEST.GCL.O]NUMBER.C;1

        init_num_co();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_num_co" is 
implicitly declared as a function.
at line number 280 in file DISK$WORK:[TEST.GCL.O]NUMBER.C;1

        init_num_log();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_num_log" is 
implicitly declared as a function.
at line number 281 in file DISK$WORK:[TEST.GCL.O]NUMBER.C;1

        init_num_sfun();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_num_sfun" is 
implicitly declared as a function.
at line number 282 in file DISK$WORK:[TEST.GCL.O]NUMBER.C;1

        init_num_rand();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "init_num_rand" is 
implicitly declared as a function.
at line number 283 in file DISK$WORK:[TEST.GCL.O]NUMBER.C;1
    SYS$DISK:[-.O]NUM_PRED.C

                FEwrong_type_argument(sLnumber, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 62 in file DISK$WORK:[TEST.GCL.O]NUM_PRED.C;1

                if (big_sign(x) > 0)
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "big_sign" is implicitly 
declared as a function.
at line number 78 in file DISK$WORK:[TEST.GCL.O]NUM_PRED.C;1

                FEwrong_type_argument(TSor_rational_float,x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 102 in file DISK$WORK:[TEST.GCL.O]NUM_PRED.C;1

                if (big_sign(x) < 0)
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "big_sign" is implicitly 
declared as a function.
at line number 118 in file DISK$WORK:[TEST.GCL.O]NUM_PRED.C;1

                FEwrong_type_argument(TSor_rational_float,x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 142 in file DISK$WORK:[TEST.GCL.O]NUM_PRED.C;1

           i = MP_LOW(MP(x),lgef(MP(x)));
...........^
%CC-W-CVTDIFTYPES, In this statement, "(((&((x)->big.big_mpz_t)))->_mp_d)" of 
type "pointer to unsigned long", is being converted to "int".
at line number 154 in file DISK$WORK:[TEST.GCL.O]NUM_PRED.C;1

                FEwrong_type_argument(sLinteger, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 156 in file DISK$WORK:[TEST.GCL.O]NUM_PRED.C;1

          i = MP_LOW(MP(x),lgef(MP(x)));
..........^
%CC-W-CVTDIFTYPES, In this statement, "(((&((x)->big.big_mpz_t)))->_mp_d)" of 
type "pointer to unsigned long", is being converted to "int".
at line number 168 in file DISK$WORK:[TEST.GCL.O]NUM_PRED.C;1

                FEwrong_type_argument(sLinteger, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 170 in file DISK$WORK:[TEST.GCL.O]NUM_PRED.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 176 in file DISK$WORK:[TEST.GCL.O]NUM_PRED.C;1

        check_type_number(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_number" is 
implicitly declared as a function.
at line number 177 in file DISK$WORK:[TEST.GCL.O]NUM_PRED.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 186 in file DISK$WORK:[TEST.GCL.O]NUM_PRED.C;1

        check_type_or_rational_float(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"check_type_or_rational_float" is implicitly declared as a function.
at line number 187 in file DISK$WORK:[TEST.GCL.O]NUM_PRED.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 196 in file DISK$WORK:[TEST.GCL.O]NUM_PRED.C;1

        check_type_or_rational_float(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"check_type_or_rational_float" is implicitly declared as a function.
at line number 197 in file DISK$WORK:[TEST.GCL.O]NUM_PRED.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 206 in file DISK$WORK:[TEST.GCL.O]NUM_PRED.C;1

        check_type_integer(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_integer" is 
implicitly declared as a function.
at line number 207 in file DISK$WORK:[TEST.GCL.O]NUM_PRED.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 216 in file DISK$WORK:[TEST.GCL.O]NUM_PRED.C;1

        check_type_integer(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_integer" is 
implicitly declared as a function.
at line number 217 in file DISK$WORK:[TEST.GCL.O]NUM_PRED.C;1
%LIBRAR-W-COMCOD, compilation warnings in module NUM_PRED file 
DISK$WORK:[TEST.GCL.O]NUM_PRED-AXP.OBJ;1
    SYS$DISK:[-.O]NUM_COMP.C

                        i = big_sign(y);
............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "big_sign" is implicitly 
declared as a function.
at line number 58 in file DISK$WORK:[TEST.GCL.O]NUM_COMP.C;1

                        i = big_sign(x);
............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "big_sign" is implicitly 
declared as a function.
at line number 87 in file DISK$WORK:[TEST.GCL.O]NUM_COMP.C;1

                if (number_zerop(y->cmp.cmp_imag))
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_zerop" is 
implicitly declared as a function.
at line number 178 in file DISK$WORK:[TEST.GCL.O]NUM_COMP.C;1

                FEwrong_type_argument(sLnumber, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 202 in file DISK$WORK:[TEST.GCL.O]NUM_COMP.C;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 212 in file DISK$WORK:[TEST.GCL.O]NUM_COMP.C;1

                check_type_number(&vs_base[i]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_number" is 
implicitly declared as a function.
at line number 214 in file DISK$WORK:[TEST.GCL.O]NUM_COMP.C;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 231 in file DISK$WORK:[TEST.GCL.O]NUM_COMP.C;1

                check_type_number(&vs_base[i]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_number" is 
implicitly declared as a function.
at line number 237 in file DISK$WORK:[TEST.GCL.O]NUM_COMP.C;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 256 in file DISK$WORK:[TEST.GCL.O]NUM_COMP.C;1

                check_type_or_rational_float(&vs_base[i]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"check_type_or_rational_float" is implicitly declared as a function.
at line number 258 in file DISK$WORK:[TEST.GCL.O]NUM_COMP.C;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 281 in file DISK$WORK:[TEST.GCL.O]NUM_COMP.C;1

                check_type_or_rational_float(&vs_base[i]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"check_type_or_rational_float" is implicitly declared as a function.
at line number 283 in file DISK$WORK:[TEST.GCL.O]NUM_COMP.C;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 298 in file DISK$WORK:[TEST.GCL.O]NUM_COMP.C;1

                check_type_or_rational_float(&vs_base[i]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"check_type_or_rational_float" is implicitly declared as a function.
at line number 300 in file DISK$WORK:[TEST.GCL.O]NUM_COMP.C;1
    SYS$DISK:[-.O]NUM_ARITH.C

                FEwrong_type_argument(sLnumber, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 94 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                        FEwrong_type_argument(sLnumber, y);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 127 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                        FEwrong_type_argument(sLnumber, y);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 150 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                        FEwrong_type_argument(sLnumber, y);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 179 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                FEwrong_type_argument(sLnumber, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 240 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                FEwrong_type_argument(sLnumber, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 286 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                        FEwrong_type_argument(sLnumber, y);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 322 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                        FEwrong_type_argument(sLnumber, y);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 346 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                        FEwrong_type_argument(sLnumber, y);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 372 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                FEwrong_type_argument(sLnumber, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 432 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                FEwrong_type_argument(sLnumber, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 472 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                FEwrong_type_argument(sLnumber, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 514 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                        FEwrong_type_argument(sLnumber, y);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 547 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                        FEwrong_type_argument(sLnumber, y);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 571 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                        FEwrong_type_argument(sLnumber, y);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 595 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                FEwrong_type_argument(sLnumber, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 664 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                        if(number_zerop(y) == TRUE)
...........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_zerop" is 
implicitly declared as a function.
at line number 682 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                                zero_divisor();
................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "zero_divisor" is 
implicitly declared as a function.
at line number 683 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                        if (number_minusp(y) == TRUE) {
............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_minusp" is 
implicitly declared as a function.
at line number 684 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                        FEwrong_type_argument(sLnumber, y);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 706 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                        if (number_zerop(y))
............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_zerop" is 
implicitly declared as a function.
at line number 713 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                                zero_divisor();
................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "zero_divisor" is 
implicitly declared as a function.
at line number 714 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                        FEwrong_type_argument(sLnumber, y);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 732 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                        zero_divisor();
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "zero_divisor" is 
implicitly declared as a function.
at line number 759 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                if (number_zerop(z3 = number_plus(z1, z2)))
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_zerop" is 
implicitly declared as a function.
at line number 797 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                FEwrong_type_argument(sLnumber, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 812 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

        integer_quotient_remainder_1(x, y, &q, &r);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"integer_quotient_remainder_1" is implicitly declared as a function.
at line number 822 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

        if (number_minusp(x))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_minusp" is 
implicitly declared as a function.
at line number 833 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

        if (number_compare(x, y) < 0) {
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_compare" is 
implicitly declared as a function.
at line number 857 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

        integer_quotient_remainder_1(x, y, &q, &r);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"integer_quotient_remainder_1" is implicitly declared as a function.
at line number 865 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                check_type_number(&vs_base[i]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_number" is 
implicitly declared as a function.
at line number 882 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 894 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                check_type_number(&vs_base[i]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_number" is 
implicitly declared as a function.
at line number 896 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                check_type_number(&vs_base[i]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_number" is 
implicitly declared as a function.
at line number 916 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 928 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                check_type_number(&vs_base[i]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_number" is 
implicitly declared as a function.
at line number 930 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 944 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

        check_type_number(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_number" is 
implicitly declared as a function.
at line number 945 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 953 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

        check_type_number(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_number" is 
implicitly declared as a function.
at line number 954 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 962 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

        check_type_number(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_number" is 
implicitly declared as a function.
at line number 963 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                check_type_integer(&vs_base[i]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_integer" is 
implicitly declared as a function.
at line number 983 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                if (number_minusp(vs_base[0]))
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_minusp" is 
implicitly declared as a function.
at line number 985 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 1001 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                check_type_integer(&vs_base[i]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_integer" is 
implicitly declared as a function.
at line number 1003 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

                if (number_minusp(vs_base[0]))
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_minusp" is 
implicitly declared as a function.
at line number 1005 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

        if (number_minusp(vs_base[0]))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_minusp" is 
implicitly declared as a function.
at line number 1018 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1

        FEerror("Zero divisor.", 0);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 1025 in file DISK$WORK:[TEST.GCL.O]NUM_ARITH.C;1
    SYS$DISK:[-.O]NUM_SFUN.C

                FEwrong_type_argument(sLnumber, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 85 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

                        FEwrong_type_argument(sLnumber, x);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 118 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

        if (number_zerop(x)) {
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_zerop" is 
implicitly declared as a function.
at line number 120 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

                if (!number_plusp(ty==t_complex?y->cmp.cmp_real:y))
.....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_plusp" is 
implicitly declared as a function.
at line number 121 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

                        FEerror("Cannot raise zero to the power ~S.", 1, y);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 122 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

                if (number_minusp(y)) {
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_minusp" is 
implicitly declared as a function.
at line number 126 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

                while (number_plusp(y))
.......................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_plusp" is 
implicitly declared as a function.
at line number 139 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

                        if (number_evenp(y)) {
............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_evenp" is 
implicitly declared as a function.
at line number 140 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

        if (number_zerop(x))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_zerop" is 
implicitly declared as a function.
at line number 176 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

                FEerror("Zero is the logarithmic singularity.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 177 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

        if (number_minusp(x)) {
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_minusp" is 
implicitly declared as a function.
at line number 178 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

                FEwrong_type_argument(sLnumber, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 196 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

        if (number_zerop(y))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_zerop" is 
implicitly declared as a function.
at line number 224 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

                FEerror("Zero is the logarithmic singularity.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 225 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

        if (number_minusp(x))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_minusp" is 
implicitly declared as a function.
at line number 247 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

                FEwrong_type_argument(sLnumber, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 263 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

                        FEerror("Logarithmic singularity.", 0);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 294 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

                FEwrong_type_argument(sLnumber, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 382 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

                FEwrong_type_argument(sLnumber, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 429 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

        if (number_zerop(c) == TRUE)
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_zerop" is 
implicitly declared as a function.
at line number 445 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

                FEerror("Cannot compute the tangent of ~S.", 1, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 446 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 454 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

        check_type_number(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_number" is 
implicitly declared as a function.
at line number 455 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 461 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

        check_type_number(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_number" is 
implicitly declared as a function.
at line number 462 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 474 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

                check_type_number(&vs_base[0]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_number" is 
implicitly declared as a function.
at line number 476 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

                check_type_number(&vs_base[0]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_number" is 
implicitly declared as a function.
at line number 479 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 484 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 489 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

        check_type_number(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_number" is 
implicitly declared as a function.
at line number 490 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 496 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

        check_type_number(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_number" is 
implicitly declared as a function.
at line number 497 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 503 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

        check_type_number(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_number" is 
implicitly declared as a function.
at line number 504 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 510 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

        check_type_number(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_number" is 
implicitly declared as a function.
at line number 511 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 521 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

                check_type_number(&vs_base[0]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_number" is 
implicitly declared as a function.
at line number 523 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

                check_type_or_rational_float(&vs_base[0]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"check_type_or_rational_float" is implicitly declared as a function.
at line number 526 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 531 in file DISK$WORK:[TEST.GCL.O]NUM_SFUN.C;1
    SYS$DISK:[-.O]NUM_CO.C

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 369 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 371 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                check_type_float(&vs_base[1]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_float" is 
implicitly declared as a function.
at line number 373 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                FEwrong_type_argument(TSor_rational_float, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 406 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 414 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_type_rational(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_rational" is 
implicitly declared as a function.
at line number 415 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 422 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_type_rational(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_rational" is 
implicitly declared as a function.
at line number 423 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 439 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                FEwrong_type_argument(TSor_rational_float, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 484 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 489 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                if (number_zerop(x)) {
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_zerop" is 
implicitly declared as a function.
at line number 495 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                integer_quotient_remainder_1(x, y, &vs_base[0], &vs_base[1]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"integer_quotient_remainder_1" is implicitly declared as a function.
at line number 502 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                if (number_minusp(x) ? number_plusp(y) : number_minusp(y)) {
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_minusp" is 
implicitly declared as a function.
at line number 503 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                if (number_minusp(x) ? number_plusp(y) : number_minusp(y)) {
.......................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_plusp" is 
implicitly declared as a function.
at line number 503 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_type_or_rational_float(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"check_type_or_rational_float" is implicitly declared as a function.
at line number 511 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                if (number_minusp(q)) {
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_minusp" is 
implicitly declared as a function.
at line number 526 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                if (number_minusp(q) && number_compare(q, q1)) {
........................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_compare" is 
implicitly declared as a function.
at line number 539 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 560 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                FEwrong_type_argument(TSor_rational_float, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 605 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 610 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                if (number_zerop(x)) {
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_zerop" is 
implicitly declared as a function.
at line number 616 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                integer_quotient_remainder_1(x, y, &vs_base[0], &vs_base[1]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"integer_quotient_remainder_1" is implicitly declared as a function.
at line number 623 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                if (number_plusp(x) ? number_plusp(y) : number_minusp(y)) {
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_plusp" is 
implicitly declared as a function.
at line number 624 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                if (number_plusp(x) ? number_plusp(y) : number_minusp(y)) {
........................................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_minusp" is 
implicitly declared as a function.
at line number 624 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_type_or_rational_float(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"check_type_or_rational_float" is implicitly declared as a function.
at line number 632 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                if (number_plusp(q)) {
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_plusp" is 
implicitly declared as a function.
at line number 647 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                if (number_plusp(q) && number_compare(q, q1)) {
.......................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_compare" is 
implicitly declared as a function.
at line number 660 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 679 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                FEwrong_type_argument(TSor_rational_float, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 712 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 717 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                integer_quotient_remainder_1(x, y, &vs_base[0], &vs_base[1]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"integer_quotient_remainder_1" is implicitly declared as a function.
at line number 722 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_type_or_rational_float(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"check_type_or_rational_float" is implicitly declared as a function.
at line number 725 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 763 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                if (d == 0.5 && number_oddp(q)) {
................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_oddp" is 
implicitly declared as a function.
at line number 786 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                FEwrong_type_argument(TSor_rational_float, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 824 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 829 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_type_or_rational_float(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"check_type_or_rational_float" is implicitly declared as a function.
at line number 832 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                if ((c = number_compare(r, plus_half)) > 0 ||
.........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_compare" is 
implicitly declared as a function.
at line number 850 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                    (c == 0 && number_oddp(q1)))
...............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_oddp" is 
implicitly declared as a function.
at line number 851 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 886 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 893 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 905 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_type_float(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_float" is 
implicitly declared as a function.
at line number 906 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 938 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_type_float(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_float" is 
implicitly declared as a function.
at line number 939 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                FEerror("~S is an illegal exponent.", 1, vs_base[1]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 944 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 977 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_type_float(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_float" is 
implicitly declared as a function.
at line number 978 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 1004 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 1006 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_type_float(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_float" is 
implicitly declared as a function.
at line number 1007 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 1036 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_type_float(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_float" is 
implicitly declared as a function.
at line number 1037 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 1048 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_type_float(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_float" is 
implicitly declared as a function.
at line number 1049 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 1082 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_type_float(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_float" is 
implicitly declared as a function.
at line number 1083 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 1109 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 1111 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_type_or_rational_float(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"check_type_or_rational_float" is implicitly declared as a function.
at line number 1112 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 1128 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_type_number(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_number" is 
implicitly declared as a function.
at line number 1129 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 1139 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1

        check_type_number(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_number" is 
implicitly declared as a function.
at line number 1140 in file DISK$WORK:[TEST.GCL.O]NUM_CO.C;1
    SYS$DISK:[-.O]NUM_LOG.C

        if (narg < 2) too_few_arguments();
......................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 20 in file DISK$WORK:[TEST.GCL.O]GMP_NUM_LOG.C;1

                if (type_of(vs_base[i]) != t_fixnum) 
FEwrong_type_argument(sLinteger, vs_base[i]);
.....................................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 24 in file DISK$WORK:[TEST.GCL.O]GMP_NUM_LOG.C;1

        x = normalize_big(u);
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "normalize_big" is 
implicitly declared as a function.
at line number 43 in file DISK$WORK:[TEST.GCL.O]GMP_NUM_LOG.C;1

        x = normalize_big(u);
........^
%CC-W-CVTDIFTYPES, In this statement, "normalize_big(...)" of type "int", is 
being converted to "pointer to union lispunion".
at line number 43 in file DISK$WORK:[TEST.GCL.O]GMP_NUM_LOG.C;1

                FEwrong_type_argument(sLinteger, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 210 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

  FEwrong_type_argument(sLinteger, x);
..^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 239 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

                check_type_integer(&vs_base[i]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_integer" is 
implicitly declared as a function.
at line number 265 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

                check_type_integer(&vs_base[i]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_integer" is 
implicitly declared as a function.
at line number 286 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

                check_type_integer(&vs_base[i]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_integer" is 
implicitly declared as a function.
at line number 306 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

                check_type_integer(&vs_base[i]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_integer" is 
implicitly declared as a function.
at line number 326 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

        check_arg(3);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 345 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

        check_type_integer(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_integer" is 
implicitly declared as a function.
at line number 346 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

        switch(fixint(o)) {
...............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "fixint" is implicitly 
declared as a function.
at line number 351 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

                        FEerror("~S is an invalid logical operator.",
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 369 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 384 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

        check_type_integer(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_integer" is 
implicitly declared as a function.
at line number 385 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

        else if (big_sign(p) < 0)
.................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "big_sign" is implicitly 
declared as a function.
at line number 394 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 424 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

        check_type_integer(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_integer" is 
implicitly declared as a function.
at line number 425 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

                sign_x = big_sign(x);
.........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "big_sign" is implicitly 
declared as a function.
at line number 452 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

                FEerror("Insufficient memory.", 0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 461 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 473 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

        check_type_integer(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_integer" is 
implicitly declared as a function.
at line number 474 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 486 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

                FEwrong_type_argument(sLinteger, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 495 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

        check_arg(4);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 595 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

                xo = BV_OFFSET(x);
.....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 603 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

                        siLmake_vector();
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "siLmake_vector" is 
implicitly declared as a function.
at line number 641 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

                xo = BV_OFFSET(x);
.....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 651 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

        ro = BV_OFFSET(r);
.............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 704 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

        switch(fixint(o)) {
...............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "fixint" is implicitly 
declared as a function.
at line number 705 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

                        FEerror("~S is an invalid logical operator.", 1, o);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 723 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1

        FEerror("Illegal arguments for bit-array operation.", 0);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 786 in file DISK$WORK:[TEST.GCL.O]NUM_LOG.C;1
%LIBRAR-W-COMCOD, compilation warnings in module NUM_LOG file 
DISK$WORK:[TEST.GCL.O]NUM_LOG-AXP.OBJ;1
    SYS$DISK:[-.O]NUM_RAND.C

        if (number_compare(x, small_fixnum(0)) != 1)
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_compare" is 
implicitly declared as a function.
at line number 42 in file DISK$WORK:[TEST.GCL.O]NUM_RAND.C;1

                FEwrong_type_argument(TSpositive_number, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 43 in file DISK$WORK:[TEST.GCL.O]NUM_RAND.C;1

                FEerror("~S is not an integer nor a floating-point number.",
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 61 in file DISK$WORK:[TEST.GCL.O]NUM_RAND.C;1

                z->rnd.rnd_value = time(0);
...................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "time" is implicitly 
declared as a function.
at line number 81 in file DISK$WORK:[TEST.GCL.O]NUM_RAND.C;1

                FEwrong_type_argument(sLrandom_state, rs);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 91 in file DISK$WORK:[TEST.GCL.O]NUM_RAND.C;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 119 in file DISK$WORK:[TEST.GCL.O]NUM_RAND.C;1

        check_type_random_state(&vs_base[1]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_random_state" 
is implicitly declared as a function.
at line number 120 in file DISK$WORK:[TEST.GCL.O]NUM_RAND.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 135 in file DISK$WORK:[TEST.GCL.O]NUM_RAND.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 143 in file DISK$WORK:[TEST.GCL.O]NUM_RAND.C;1
    SYS$DISK:[-.O]EARITH.C

#define MP_LOW(x,l) ((x)[(l)-1])
...............^
%CC-W-MACROREDEF, The redefinition of the macro "MP_LOW" conflicts with a 
current definition because the spelling of one or more parameters is different. 
 The redefinition is now in effect.
at line number 246 in file DISK$WORK:[TEST.GCL.H]ARITH.H;1

#define MYmake_fixnum(doto,x) \
......................^
%CC-W-MACROREDEF, The redefinition of the macro "MYmake_fixnum" conflicts with 
a current definition because the spelling of one or more parameters is 
different.  The redefinition is now in effect.
at line number 29 in file DISK$WORK:[TEST.GCL.O]CMAC.C;1

  h = mpn_divrem_1(&q,0,ar,2,mod);
...................^
%CC-W-PTRMISMATCH, In this statement, the referenced type of the pointer value 
"&q" is "array [2] of unsigned long", which is not compatible with "unsigned 
long".
at line number 65 in file DISK$WORK:[TEST.GCL.O]CMAC.C;1

    integer_quotient_remainder_1(x,mod,&qp,&rp);
....^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"integer_quotient_remainder_1" is implicitly declared as a function.
at line number 88 in file DISK$WORK:[TEST.GCL.O]CMAC.C;1

    compare = number_compare(rp,small_fixnum(0));
..............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "number_compare" is 
implicitly declared as a function.
at line number 90 in file DISK$WORK:[TEST.GCL.O]CMAC.C;1

DEFUNO("CMOD",object,fScmod,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 145 in file DISK$WORK:[TEST.GCL.O]CMAC.C;1

DEFUNO("CPLUS",object,fScplus,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 154 in file DISK$WORK:[TEST.GCL.O]CMAC.C;1

DEFUNO("CTIMES",object,fSctimes,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 163 in file DISK$WORK:[TEST.GCL.O]CMAC.C;1

DEFUNO("CDIFFERENCE",object,fScdifference,SI
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 173 in file DISK$WORK:[TEST.GCL.O]CMAC.C;1
%LIBRAR-W-COMCOD, compilation warnings in module EARITH file 
DISK$WORK:[TEST.GCL.O]EARITH-AXP.OBJ;1
    SYS$DISK:[-.O]CHARACTER.C

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 36 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_type_character(&c);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 32 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 48 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_type_character(&c);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 44 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 59 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_type_character(&c);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 55 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 68 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_type_character(&c);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 64 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 80 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_type_character(&c);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 76 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 90 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_type_character(&c);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 86 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 100 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_type_character(&c);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 96 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 131 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 137 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_type_character(&c);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 125 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_type_non_negative_integer(&r);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"check_type_non_negative_integer" is implicitly declared as a function.
at line number 126 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 144 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_type_character(&c);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 140 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 167 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

                check_type_character(&vs_base[i]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 163 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 178 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

                check_type_character(&vs_base[i]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 174 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 211 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

                check_type_character(&vs_base[i]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 213 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 253 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

                check_type_character(&vs_base[i]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 249 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 264 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

                check_type_character(&vs_base[i]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 260 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 296 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

                check_type_character(&vs_base[i]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 298 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 347 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 352 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_type_character(&c);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 348 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 358 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_type_character(&c);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 354 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 364 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_type_character(&c);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 360 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 374 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 384 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_type_non_negative_integer(&c);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"check_type_non_negative_integer" is implicitly declared as a function.
at line number 367 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 398 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 408 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_type_character(&c);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 391 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_type_non_negative_integer(&b);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"check_type_non_negative_integer" is implicitly declared as a function.
at line number 393 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 416 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_type_character(&c);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 412 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 427 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_type_character(&c);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 423 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 458 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 468 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_type_non_negative_integer(&w);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"check_type_non_negative_integer" is implicitly declared as a function.
at line number 451 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 481 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_type_character(&c);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 477 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 490 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_type_non_negative_integer(&x);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"check_type_non_negative_integer" is implicitly declared as a function.
at line number 486 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 513 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_type_character(&c);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 509 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 543 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        if (string_equal(s, STreturn))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "string_equal" is 
implicitly declared as a function.
at line number 540 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 564 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_type_character(&c);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 559 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        FEerror("Cannot get char-bit of ~S.", 1, c);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 560 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_arg(3);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 571 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        check_type_character(&c);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 565 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1

        FEerror("Cannot set char-bit of ~S.", 1, c);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 566 in file DISK$WORK:[TEST.GCL.O]CHARACTER.D;1
    SYS$DISK:[-.O]SEQUENCE.C

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 78 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

        vs_base[0] = elt(vs_base[0], fixint(vs_base[1]));
.....................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "fixint" is implicitly 
declared as a function.
at line number 79 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

                FEerror("Negative index: ~D.", 1, vs_head);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 95 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

                        if (endp(l))
............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 100 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

                FEerror("~S is not a sequence.", 1, seq);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 121 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

        FEerror("The index, ~D, is too large", 1, vs_head);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 126 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

        check_arg(3);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 131 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

        vs_base[0] = elt_set(vs_base[0], fixint(vs_base[1]), vs_base[2]);
.........................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "fixint" is implicitly 
declared as a function.
at line number 132 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

                FEerror("Negative index: ~D.", 1, vs_head);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 150 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

                        if (endp(l))
............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 155 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

                        FEerror("~S is not a character.", 1, val);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 173 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

        FEerror("The index, ~D, is too large", 1, vs_head);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 184 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 199 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 205 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

        s = fixnnint(start);
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "fixnnint" is implicitly 
declared as a function.
at line number 191 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

                FEwrong_type_argument(sLsequence, sequence);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 205 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

                        vs_check_push(sequence->c.c_car);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "vs_overflow" is 
implicitly declared as a function.
at line number 221 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

                        stack_cons();
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "stack_cons" is 
implicitly declared as a function.
at line number 226 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

                array_allocself(x, FALSE,0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "array_allocself" is 
implicitly declared as a function.
at line number 238 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

        FEerror("~S and ~S are illegal as :START and :END~%\
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 310 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 316 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

                FEwrong_type_argument(sLsequence, x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 333 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 356 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 362 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

                FEwrong_type_argument(sLsequence, seq);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 379 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

                array_allocself(y, FALSE,0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "array_allocself" is 
implicitly declared as a function.
at line number 393 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 455 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1

                FEwrong_type_argument(sLsequence, seq);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 472 in file DISK$WORK:[TEST.GCL.O]SEQUENCE.D;1
    SYS$DISK:[-.O]LIST.C

                    FEerror("Both :TEST and :TEST-NOT are specified.", 0);
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 113 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        FEwrong_type_argument(sLlist, x);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 158 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        FEwrong_type_argument(sLlist, x);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 169 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        FEwrong_type_argument(sLlist, x);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 180 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        FEwrong_type_argument(sLcons, x);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 189 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        FEwrong_type_argument(sLcons, x);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 198 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

 {COERCE_VA_LIST(new,ap,n);
..^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 257 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                vs_check_push(x);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "vs_overflow" is 
implicitly declared as a function.
at line number 438 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                vs_check_push(new);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "vs_overflow" is 
implicitly declared as a function.
at line number 452 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                        vs_check_push(cdr(x->c.c_car));
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "vs_overflow" is 
implicitly declared as a function.
at line number 495 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                vs_check_push(tree);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "vs_overflow" is 
implicitly declared as a function.
at line number 504 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 536 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                FEwrong_type_argument(sLlist, vs_base[0]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 541 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 546 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                FEwrong_type_argument(sLlist, vs_base[0]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 551 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcaar(){  check_arg(1);  vs_base[0] = car(car(vs_base[0]));  }
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 583 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcadr(){  check_arg(1);  vs_base[0] = car(cdr(vs_base[0]));  }
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 584 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcdar(){  check_arg(1);  vs_base[0] = cdr(car(vs_base[0]));  }
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 585 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcddr(){  check_arg(1);  vs_base[0] = cdr(cdr(vs_base[0]));  }
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 586 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcaaar(){  check_arg(1);  vs_base[0] = car(car(car(vs_base[0])));  }
...........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 587 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcaadr(){  check_arg(1);  vs_base[0] = car(car(cdr(vs_base[0])));  }
...........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 588 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcadar(){  check_arg(1);  vs_base[0] = car(cdr(car(vs_base[0])));  }
...........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 589 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcaddr(){  check_arg(1);  vs_base[0] = car(cdr(cdr(vs_base[0])));  }
...........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 590 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcdaar(){  check_arg(1);  vs_base[0] = cdr(car(car(vs_base[0])));  }
...........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 591 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcdadr(){  check_arg(1);  vs_base[0] = cdr(car(cdr(vs_base[0])));  }
...........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 592 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcddar(){  check_arg(1);  vs_base[0] = cdr(cdr(car(vs_base[0])));  }
...........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 593 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcdddr(){  check_arg(1);  vs_base[0] = cdr(cdr(cdr(vs_base[0])));  }
...........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 594 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcaaaar(){check_arg(1); vs_base[0] = car(car(car(car(vs_base[0]))));}
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 595 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcaaadr(){check_arg(1); vs_base[0] = car(car(car(cdr(vs_base[0]))));}
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 596 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcaadar(){check_arg(1); vs_base[0] = car(car(cdr(car(vs_base[0]))));}
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 597 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcaaddr(){check_arg(1); vs_base[0] = car(car(cdr(cdr(vs_base[0]))));}
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 598 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcadaar(){check_arg(1); vs_base[0] = car(cdr(car(car(vs_base[0]))));}
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 599 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcadadr(){check_arg(1); vs_base[0] = car(cdr(car(cdr(vs_base[0]))));}
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 600 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcaddar(){check_arg(1); vs_base[0] = car(cdr(cdr(car(vs_base[0]))));}
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 601 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcadddr(){check_arg(1); vs_base[0] = car(cdr(cdr(cdr(vs_base[0]))));}
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 602 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcdaaar(){check_arg(1); vs_base[0] = cdr(car(car(car(vs_base[0]))));}
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 603 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcdaadr(){check_arg(1); vs_base[0] = cdr(car(car(cdr(vs_base[0]))));}
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 604 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcdadar(){check_arg(1); vs_base[0] = cdr(car(cdr(car(vs_base[0]))));}
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 605 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcdaddr(){check_arg(1); vs_base[0] = cdr(car(cdr(cdr(vs_base[0]))));}
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 606 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcddaar(){check_arg(1); vs_base[0] = cdr(cdr(car(car(vs_base[0]))));}
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 607 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcddadr(){check_arg(1); vs_base[0] = cdr(cdr(car(cdr(vs_base[0]))));}
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 608 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcdddar(){check_arg(1); vs_base[0] = cdr(cdr(cdr(car(vs_base[0]))));}
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 609 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

Lcddddr(){check_arg(1); vs_base[0] = cdr(cdr(cdr(cdr(vs_base[0]))));}
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 610 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

DEFUNO("NTH",object,fLnth,LISP,2,2,NONE,OI,OO,OO,OO,Lnth,"")(index,list)
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 612 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

    FEerror("Negative index: ~D.", 1, make_fixnum(index));
....^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 617 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

      else FEwrong_type_argument(sLlist, list);}
...........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 624 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

DEFUNO("SECOND",object,fLsecond,LISP,1,1,NONE,OO,OO,OO,OO,Lsecond,"") (x)
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 632 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

DEFUNO("THIRD",object,fLthird,LISP,1,1,NONE,OO,OO,OO,OO,Lthird,"") (x)
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 635 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

DEFUNO("FOURTH",object,fLfourth,LISP,1,1,NONE,OO,OO,OO,OO,Lfourth,"") (x)
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 638 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

DEFUNO("FIFTH",object,fLfifth,LISP,1,1,NONE,OO,OO,OO,OO,Lfifth,"")(x)
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 641 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

DEFUNO("SIXTH",object,fLsixth,LISP,1,1,NONE,OO,OO,OO,OO,Lsixth,"")(x)
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 644 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

DEFUNO("SEVENTH",object,fLseventh,LISP,1,1,NONE,OO,OO,OO,OO,Lseventh,"")(x)
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 647 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

DEFUNO("EIGHTH",object,fLeighth,LISP,1,1,NONE,OO,OO,OO,OO,Leighth,"")(x)
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 650 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

DEFUNO("NINTH",object,fLninth,LISP,1,1,NONE,OO,OO,OO,OO,Lninth,"")(x)
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 653 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

DEFUNO("TENTH",object,fLtenth,LISP,1,1,NONE,OO,OO,OO,OO,Ltenth,"")(x)
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 656 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 664 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 683 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        parse_key(vs_base+2+0,FALSE, FALSE, 2,
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "parse_key" is implicitly 
declared as a function.
at line number 684 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        protectTEST;    
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "frs_overflow" is 
implicitly declared as a function.
at line number 675 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        restoreTEST;
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "unwind" is implicitly 
declared as a function.
at line number 678 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 686 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        FEwrong_type_argument(sLlist, vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 696 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 704 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                FEerror("Negative index: ~D.", 1, vs_head);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 734 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 749 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        vs_base[0] = nthcdr(fixint(vs_base[0]), vs_base[1]);
............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "fixint" is implicitly 
declared as a function.
at line number 750 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                FEerror("Negative index: ~D.", 1, vs_head);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 761 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 773 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 790 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 846 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        parse_key(vs_base+1+0,FALSE, FALSE, 1,
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "parse_key" is implicitly 
declared as a function.
at line number 847 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        check_type_non_negative_integer(&size);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"check_type_non_negative_integer" is implicitly declared as a function.
at line number 839 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                FEerror("Cannot make a list of the size ~D.", 1, size);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 841 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 865 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 871 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 877 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 886 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 944 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 965 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 971 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        check_type_non_negative_integer(&nn);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"check_type_non_negative_integer" is implicitly declared as a function.
at line number 959 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                vs_check_push(lis->c.c_car);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "vs_overflow" is 
implicitly declared as a function.
at line number 963 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 988 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 994 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        check_type_non_negative_integer(&nn);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"check_type_non_negative_integer" is implicitly declared as a function.
at line number 982 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 1000 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                        vs_check_push(x->c.c_car);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "vs_overflow" is 
implicitly declared as a function.
at line number 1005 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 1015 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        check_type_cons(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_cons" is 
implicitly declared as a function.
at line number 1016 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 1024 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        check_type_cons(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_cons" is 
implicitly declared as a function.
at line number 1025 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 1043 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        parse_key(vs_base+3+0,FALSE, FALSE, 3,
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "parse_key" is implicitly 
declared as a function.
at line number 1044 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        protectTEST;
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "frs_overflow" is 
implicitly declared as a function.
at line number 1033 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        restoreTEST;
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "unwind" is implicitly 
declared as a function.
at line number 1037 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

PREDICATE(Lsubst, Lsubst_if, Lsubst_if_not, 3)
^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 1041 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

PREDICATE(Lsubst, Lsubst_if, Lsubst_if_not, 3)
^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 1041 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 1057 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        parse_key(vs_base+3+0,FALSE, FALSE, 3,
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "parse_key" is implicitly 
declared as a function.
at line number 1058 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        protectTEST;
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "frs_overflow" is 
implicitly declared as a function.
at line number 1047 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        restoreTEST;
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "unwind" is implicitly 
declared as a function.
at line number 1050 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

PREDICATE(Lnsubst, Lnsubst_if, Lnsubst_if_not, 3)
^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 1054 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

PREDICATE(Lnsubst, Lnsubst_if, Lnsubst_if_not, 3)
^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 1054 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

 FEerror("Not alist",0);}
.^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 1085 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 1103 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        parse_key(vs_base+2+0,FALSE, FALSE, 3,
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "parse_key" is implicitly 
declared as a function.
at line number 1104 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        protectTEST;
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "frs_overflow" is 
implicitly declared as a function.
at line number 1094 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        restoreTEST;
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "unwind" is implicitly 
declared as a function.
at line number 1098 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 1114 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        parse_key(vs_base+2+0,FALSE, FALSE, 3,
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "parse_key" is implicitly 
declared as a function.
at line number 1115 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        protectTEST;
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "frs_overflow" is 
implicitly declared as a function.
at line number 1105 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        restoreTEST;
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "unwind" is implicitly 
declared as a function.
at line number 1108 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 1126 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        parse_key(vs_base+2+0,FALSE, FALSE, 3,
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "parse_key" is implicitly 
declared as a function.
at line number 1127 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        protectTEST;
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "frs_overflow" is 
implicitly declared as a function.
at line number 1117 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        restoreTEST;
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "unwind" is implicitly 
declared as a function.
at line number 1124 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

PREDICATE(Lmember, Lmember_if, Lmember_if_not, 2)
^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 1128 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

PREDICATE(Lmember, Lmember_if, Lmember_if_not, 2)
^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 1128 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 1143 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        parse_key(vs_base+2+0,FALSE, FALSE, 3,
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "parse_key" is implicitly 
declared as a function.
at line number 1144 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        protectTEST;
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "frs_overflow" is 
implicitly declared as a function.
at line number 1134 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        restoreTEST;
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "unwind" is implicitly 
declared as a function.
at line number 1143 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 1151 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 1168 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        check_arg(3);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 1180 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 1198 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 1204 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                 FEerror(
.................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 1196 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                vs_check_push(make_cons(k->c.c_car, d->c.c_car));
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "vs_overflow" is 
implicitly declared as a function.
at line number 1199 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

            FEerror("The keys ~S and the data ~S are not of the same length",
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 1204 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 1225 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        parse_key(vs_base+2+0,FALSE, FALSE, 3,
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "parse_key" is implicitly 
declared as a function.
at line number 1226 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        protectTEST;
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "frs_overflow" is 
implicitly declared as a function.
at line number 1216 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        restoreTEST;
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "unwind" is implicitly 
declared as a function.
at line number 1226 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 1243 in file DISK$WORK:[TEST.GCL.O]LIST.D;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 1270 in file DISK$WORK:[TEST.GCL.O]LIST.D;1
    SYS$DISK:[-.O]HASH.C

            bzero(ar,sizeof(ar));
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bzero" is implicitly 
declared as a function.
at line number 143 in file DISK$WORK:[TEST.GCL.O]HASH.D;1

                extend_hashtable(hashtable);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "extend_hashtable" is 
implicitly declared as a function.
at line number 250 in file DISK$WORK:[TEST.GCL.O]HASH.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 320 in file DISK$WORK:[TEST.GCL.O]HASH.D;1

        parse_key(vs_base+0+0,FALSE, FALSE, 4,
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "parse_key" is implicitly 
declared as a function.
at line number 321 in file DISK$WORK:[TEST.GCL.O]HASH.D;1

                FEerror("~S is an illegal hash-table test function.",
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 318 in file DISK$WORK:[TEST.GCL.O]HASH.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 361 in file DISK$WORK:[TEST.GCL.O]HASH.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 376 in file DISK$WORK:[TEST.GCL.O]HASH.D;1

                too_many_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_many_arguments" is 
implicitly declared as a function.
at line number 380 in file DISK$WORK:[TEST.GCL.O]HASH.D;1

        check_type_hash_table(&vs_base[1]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_hash_table" 
is implicitly declared as a function.
at line number 381 in file DISK$WORK:[TEST.GCL.O]HASH.D;1

        check_arg(3);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 395 in file DISK$WORK:[TEST.GCL.O]HASH.D;1

        check_type_hash_table(&vs_base[1]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_hash_table" 
is implicitly declared as a function.
at line number 397 in file DISK$WORK:[TEST.GCL.O]HASH.D;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 406 in file DISK$WORK:[TEST.GCL.O]HASH.D;1

        check_type_hash_table(&vs_base[1]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_hash_table" 
is implicitly declared as a function.
at line number 407 in file DISK$WORK:[TEST.GCL.O]HASH.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 423 in file DISK$WORK:[TEST.GCL.O]HASH.D;1

        check_type_hash_table(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_hash_table" 
is implicitly declared as a function.
at line number 424 in file DISK$WORK:[TEST.GCL.O]HASH.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 436 in file DISK$WORK:[TEST.GCL.O]HASH.D;1

        check_type_hash_table(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_hash_table" 
is implicitly declared as a function.
at line number 437 in file DISK$WORK:[TEST.GCL.O]HASH.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 444 in file DISK$WORK:[TEST.GCL.O]HASH.D;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 455 in file DISK$WORK:[TEST.GCL.O]HASH.D;1

        check_type_hash_table(&vs_base[1]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_hash_table" 
is implicitly declared as a function.
at line number 456 in file DISK$WORK:[TEST.GCL.O]HASH.D;1

  check_type_hash_table(&table);
..^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_hash_table" 
is implicitly declared as a function.
at line number 473 in file DISK$WORK:[TEST.GCL.O]HASH.D;1

  if ( i < 0) { FEerror("needs non negative index",0);}
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 474 in file DISK$WORK:[TEST.GCL.O]HASH.D;1

  FEerror("not able to get hash table test for ~a",1,table);
..^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 492 in file DISK$WORK:[TEST.GCL.O]HASH.D;1
    SYS$DISK:[-.O]ARRAY.C

DEFUNO("AREF", object, fLaref, LISP, 1, ARRAY_RANK_LIMIT,
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 57 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

       FEerror(" ~a has wrong rank",1,x);
.......^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 71 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

                   check_type(x,t_fixnum);
...................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type" is 
implicitly declared as a function.
at line number 91 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

    { FEerror("Too many args (~a) to aref",1,make_fixnum(n));}
......^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 100 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

    FEerror("Array index ~a out of bounds for ~a", 2,  make_fixnum(i),x);
....^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 116 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

int
^
%CC-W-MISSINGRETURN, Non-void function "fScheck_bounds_bounds" does not contain 
a return statement.
at line number 105 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

 if (x->v.v_dim > i) illegal_index(x,make_fixnum(i));
.....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "illegal_index" is 
implicitly declared as a function.
at line number 133 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

 FEerror("Bad simple vector ~a",1,x);
.^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 134 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

      i += BV_OFFSET(x);
...........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 157 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

      FEerror("unknown array type",0);
......^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 175 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

    FEerror("not an array",0);
....^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 182 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

      i +=  BV_OFFSET(x);
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 209 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

      FEerror("unknown array type",0);
......^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 247 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

    FEerror("not an array",0);
....^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 257 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

DEFUNO("ASET", object, fSaset, SI, 1, ARG_LIMIT, NONE, OO,
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 262 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

       FEerror(" ~a has wrong rank",1,x);
.......^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 277 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

            check_type(u,t_fixnum);
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type" is 
implicitly declared as a function.
at line number 301 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

DEFUNO("SVSET", object, fSsvset, SI, 3, 3, NONE, OO, IO, OO,
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 321 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

    { FEerror("out of bounds",0);
......^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 330 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

            if (x->v.v_fillp > n) FEerror("bad fillp",0);
..................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 387 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

          array_allocself(x,staticp!=Cnil,initial_element);
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "array_allocself" is 
implicitly declared as a function.
at line number 427 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

        else { displace(x,displaced_to,displaced_index_offset);}
...............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "displace" is implicitly 
declared as a function.
at line number 428 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

DEFUNO("MAKE-VECTOR",object,fSmake_vector,SI,7,8,NONE,
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 480 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

  int rank = length(dimensions);
.............^
%CC-I-IMPLICITFUNC, In the initializer for rank, the identifier "length" is 
implicitly declared as a function.
at line number 524 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

          { FEerror("Dimension must be non negative",0);}
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 540 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

        array_allocself(x,staticp!=Cnil,initial_element);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "array_allocself" is 
implicitly declared as a function.
at line number 546 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

    else { displace(x,displaced_to,displaced_index_offset);}
...........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "displace" is implicitly 
declared as a function.
at line number 547 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

    { FEerror("Destination array too small to hold other array",0);
......^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 579 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

    { offset += BV_OFFSET(dest_array);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 597 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

         FEerror("Not an array ~a ",1,x);
.........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 626 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

    FEerror("Attempt to displace arrays of one type to arrays of another 
type",0);
....^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 644 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

     displaced_index_offset += BV_OFFSET(to);
...............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 654 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

                x->ust.ust_self = (char *)((int)(x->a.a_self) + diff);
................^
%CC-W-PTRMISMATCH, In this statement, the referenced type of the pointer value 
"(char ...)((int)(x->a.a_self)+diff)" is "char", which is not compatible with 
"unsigned char".
at line number 672 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

  default: FEerror("bad elttype",0);
...........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 705 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

    default:         FEerror("bad elttype",0);
.....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 744 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

       FEerror("Bit copies only if aligned",0);
.......^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 770 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

    FEerror("Can't copy between different array types",0);
....^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 790 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

  bcopy(x->ust.ust_self + (i1*aet_sizes[(int)typ1]),
..^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bcopy" is implicitly 
declared as a function.
at line number 795 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

                SET_BV_OFFSET(x,0);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 834 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

DEFUNO("FILL-POINTER-SET",int,fSfill_pointer_set,SI,2,2,
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 850 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

      { FEerror("~a is not suitable for a fill pointer for 
~a",2,make_fixnum(i),x);}
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 864 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

        FEerror("~a does not have a fill pointer",1,x);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 869 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

DEFUNO("FILL-POINTER",int,fLfill_pointer,LISP,1,1,NONE,IO,
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 874 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

  FEerror("~a does not have a fill pointer",1,x);
..^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 888 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

DEFUNO("ARRAY-ELEMENT-TYPE",object,fLarray_element_type,
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 916 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

DEFUNO("ADJUSTABLE-ARRAY-P",object,fLadjustable_array_p,
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 925 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

DEFUNO("DISPLACED-ARRAY-P",object,fSdisplaced_array_p,SI,1,
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 932 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

DEFUNO("ARRAY-RANK",int,fLarray_rank,LISP,1,1,NONE,IO,OO,OO,
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 940 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

DEFUNO("ARRAY-DIMENSION",int,fLarray_dimension,LISP,2,2,
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 950 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

        FEerror("Index ~a out of bounds for array-dimension",1
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 957 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

            + BV_OFFSET(u) - BV_OFFSET(ar) > 0)
..............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 973 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

        FEerror("Bad displacement",0);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 975 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

DEFUNO("REPLACE-ARRAY",object,fSreplace_array,SI,2,2,NONE,
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 1020 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

        FEerror("Cannot do array replacement ~a by ~a",2,old,new);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 1032 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

DEFUNO("ARRAY-TOTAL-SIZE",int,fLarray_total_size,LISP,1,1,
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 1059 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

DEFUNO("ASET-BY-CURSOR",object,fSaset_by_cursor,SI,3,3,
^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"Iinvoke_c_function_from_value_stack" is implicitly declared as a function.
at line number 1068 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1

        for (x = MMcdr(cursor);  !endp(x);  x = MMcdr(x))
..................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 1081 in file DISK$WORK:[TEST.GCL.O]ARRAY.C;1
%LIBRAR-W-COMCOD, compilation warnings in module ARRAY file 
DISK$WORK:[TEST.GCL.O]ARRAY-AXP.OBJ;1
    SYS$DISK:[-.O]STRING.C

        FEerror("~S cannot be coerced to a string.", 1, x);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 199 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 210 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

        check_type_string(&s);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_string" is 
implicitly declared as a function.
at line number 205 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

                illegal_index(s, i);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "illegal_index" is 
implicitly declared as a function.
at line number 207 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

        check_arg(3);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 217 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

        check_type_string(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_string" is 
implicitly declared as a function.
at line number 218 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

                illegal_index(vs_base[0], vs_base[1]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "illegal_index" is 
implicitly declared as a function.
at line number 220 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

        check_type_character(&vs_base[2]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_character" is 
implicitly declared as a function.
at line number 223 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

        FEerror("~S and ~S are illegal as :START and :END~%\
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 255 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 273 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

        parse_key(vs_base+2+0,FALSE, FALSE, 4,
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "parse_key" is implicitly 
declared as a function.
at line number 274 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 291 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

        parse_key(vs_base+2+0,FALSE, FALSE, 4,
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "parse_key" is implicitly 
declared as a function.
at line number 292 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 319 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

        parse_key(vs_base+2+0,FALSE, FALSE, 4,
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "parse_key" is implicitly 
declared as a function.
at line number 320 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 358 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

        parse_key(vs_base+2+0,FALSE, FALSE, 4,
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "parse_key" is implicitly 
declared as a function.
at line number 359 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 398 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

        parse_key(vs_base+1+0,FALSE, FALSE, 1,
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "parse_key" is implicitly 
declared as a function.
at line number 399 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

                while (!endp(char_bag)) {
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 421 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

                FEerror("~S is not a sequence.", 1, char_bag);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 448 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

Lstring_trim() { left_trim = right_trim = TRUE; Lstring_trim0(); }
................................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "Lstring_trim0" is 
implicitly declared as a function.
at line number 453 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

Lstring_left_trim() { left_trim = TRUE; right_trim = FALSE; Lstring_trim0(); }
............................................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "Lstring_trim0" is 
implicitly declared as a function.
at line number 454 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

Lstring_right_trim() { left_trim = FALSE; right_trim = TRUE; Lstring_trim0();}
.............................................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "Lstring_trim0" is 
implicitly declared as a function.
at line number 455 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 466 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 527 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

        parse_key(vs_base+1+0,FALSE, FALSE, 2,
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "parse_key" is implicitly 
declared as a function.
at line number 528 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

                too_few_arguments();
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 545 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

        parse_key(vs_base+1+0,FALSE, FALSE, 2,
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "parse_key" is implicitly 
declared as a function.
at line number 546 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

        check_type_string(&strng);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_string" is 
implicitly declared as a function.
at line number 538 in file DISK$WORK:[TEST.GCL.O]STRING.D;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 558 in file DISK$WORK:[TEST.GCL.O]STRING.D;1
    SYS$DISK:[-.O]REGEXPR.C

  FEerror("Regexp Error: ~a",1,make_simple_string(s));
..^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 31 in file DISK$WORK:[TEST.GCL.O]REGEXPR.C;1

        r = (regexp *)malloc(sizeof(regexp) + (unsigned)regsize);
......................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "malloc" is implicitly 
declared as a function.
at line number 255 in file DISK$WORK:[TEST.GCL.O]REGEXP.C;1

        else { r->regmaybe_boyer = min_initial_branch_length(r,0,0);}
...................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"min_initial_branch_length" is implicitly declared as a function.
at line number 305 in file DISK$WORK:[TEST.GCL.O]REGEXP.C;1

                     exit(1);}
.....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "exit" is implicitly 
declared as a function.
at line number 555 in file DISK$WORK:[TEST.GCL.O]REGEXP.C;1

            unsigned char *s = string+ advance -1;
...............................^
%CC-W-PTRMISMATCH, In the initializer for s, the referenced type of the pointer 
value "string+advance-1" is "char", which is not compatible with "unsigned 
char".
at line number 849 in file DISK$WORK:[TEST.GCL.O]REGEXP.C;1

            min_initial_branch_length(prog, buf,advance);
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier 
"min_initial_branch_length" is implicitly declared as a function.
at line number 850 in file DISK$WORK:[TEST.GCL.O]REGEXP.C;1

        abort();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "abort" is implicitly 
declared as a function.
at line number 1502 in file DISK$WORK:[TEST.GCL.O]REGEXP.C;1

        not_a_string_or_symbol(string);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_string_or_symbol" 
is implicitly declared as a function.
at line number 104 in file DISK$WORK:[TEST.GCL.O]REGEXPR.C;1

     FEerror("Bad start or end",0);
.....^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 111 in file DISK$WORK:[TEST.GCL.O]REGEXPR.C;1

      { char *tmp = (sizeof(buf) >= len-1 ? buf :(char *) malloc(len+1)) ;
..........................................................^
%CC-I-IMPLICITFUNC, In the initializer for tmp, the identifier "malloc" is 
implicitly declared as a function.
at line number 128 in file DISK$WORK:[TEST.GCL.O]REGEXPR.C;1

        if (compiled_regexp) {free((void *)compiled_regexp);
..............................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "free" is implicitly 
declared as a function.
at line number 132 in file DISK$WORK:[TEST.GCL.O]REGEXPR.C;1

        if (tmp!=buf) free(tmp);
......................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "free" is implicitly 
declared as a function.
at line number 135 in file DISK$WORK:[TEST.GCL.O]REGEXPR.C;1

          str = (char *)malloc(string->st.st_fillp+1);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "malloc" is implicitly 
declared as a function.
at line number 148 in file DISK$WORK:[TEST.GCL.O]REGEXPR.C;1

      if (str!=string->st.st_self) free(str);
...................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "free" is implicitly 
declared as a function.
at line number 153 in file DISK$WORK:[TEST.GCL.O]REGEXPR.C;1
%LIBRAR-W-COMCOD, compilation warnings in module REGEXPR file 
DISK$WORK:[TEST.GCL.O]REGEXPR-AXP.OBJ;1
    SYS$DISK:[-.O]STRUCTURE.C

    FEerror("bad call to structure_subtypep",0);
....^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 45 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

{         FEerror("Bad raw struct type",0);}
..........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 54 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

   FEwrong_type_argument((type_of(name)==t_structure ?
...^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 66 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

 check_type_structure(x);
.^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 93 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

   FEerror("Structure ref out of bounds",0);
...^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 96 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

   FEwrong_type_argument((type_of(name)==t_structure ?
...^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 115 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

 check_arg(2);
.^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 147 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

        for (i=0, n=def->length;  !endp(s)&&i<n;  s=s->c.c_cdr, i++) {
...................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 176 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

        stack_cons();
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "stack_cons" is 
implicitly declared as a function.
at line number 182 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

    too_few_arguments();
....^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 194 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

    FEerror("Bad make_structure args for type ~a",1,
....^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 201 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

    bzero(x->str.str_self,size);
....^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bzero" is implicitly 
declared as a function.
at line number 214 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

        if (vs_top-vs_base < 1) too_few_arguments();
................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "too_few_arguments" is 
implicitly declared as a function.
at line number 250 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

        check_type_structure(x);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 252 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

        bcopy(x->str.str_self,y->str.str_self,def->size);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "bcopy" is implicitly 
declared as a function.
at line number 258 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 266 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

        check_type_structure(vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 267 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

        check_arg(3);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 274 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

        check_arg(4);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 282 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 290 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

        check_arg(3);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 309 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

                FEerror("~S is not a non-negative fixnum.", 1, vs_base[1]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 311 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

                if (endp(l))
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 317 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 337 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

                FEerror("~S is not a non-negative fixnum.", 1, vs_base[0]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 339 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

                if (endp(l))
....................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 345 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

 check_arg(5);
.^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 358 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

{check_arg(1);
.^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 380 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1

 check_type_structure(vs_base[0]);
.^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 381 in file DISK$WORK:[TEST.GCL.O]STRUCTURE.C;1
    SYS$DISK:[-.O]TOPLEVEL.C

        if (endp(args) || endp(MMcdr(args)))
............^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 49 in file DISK$WORK:[TEST.GCL.O]TOPLEVEL.C;1

                FEtoo_few_argumentsF(args);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 50 in file DISK$WORK:[TEST.GCL.O]TOPLEVEL.C;1

                FEerror("~S is an illegal lambda-list.", 1, MMcadr(args));
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 52 in file DISK$WORK:[TEST.GCL.O]TOPLEVEL.C;1

                not_a_symbol(name);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "not_a_symbol" is 
implicitly declared as a function.
at line number 55 in file DISK$WORK:[TEST.GCL.O]TOPLEVEL.C;1

        check_arg(1);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 103 in file DISK$WORK:[TEST.GCL.O]TOPLEVEL.C;1

        check_type_symbol(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_symbol" is 
implicitly declared as a function.
at line number 104 in file DISK$WORK:[TEST.GCL.O]TOPLEVEL.C;1

                FEerror("~S is a constant.", 1, vs_base[0]);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 106 in file DISK$WORK:[TEST.GCL.O]TOPLEVEL.C;1

        check_arg(2);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_arg_failed" is 
implicitly declared as a function.
at line number 112 in file DISK$WORK:[TEST.GCL.O]TOPLEVEL.C;1

        check_type_symbol(&vs_base[0]);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "check_type_symbol" is 
implicitly declared as a function.
at line number 113 in file DISK$WORK:[TEST.GCL.O]TOPLEVEL.C;1

                FEerror(
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 115 in file DISK$WORK:[TEST.GCL.O]TOPLEVEL.C;1

        if(endp(arg))
...........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 132 in file DISK$WORK:[TEST.GCL.O]TOPLEVEL.C;1

                FEtoo_few_argumentsF(arg);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 133 in file DISK$WORK:[TEST.GCL.O]TOPLEVEL.C;1

                 FEinvalid_form("~S is an undefined situation for EVAL-WHEN.",
.................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEinvalid_form" is 
implicitly declared as a function.
at line number 138 in file DISK$WORK:[TEST.GCL.O]TOPLEVEL.C;1

                eval(vs_head);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 142 in file DISK$WORK:[TEST.GCL.O]TOPLEVEL.C;1

        FEerror("DECLARE appeared in an invalid position.", 0);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 153 in file DISK$WORK:[TEST.GCL.O]TOPLEVEL.C;1

        Fprogn(body);
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "Fprogn" is implicitly 
declared as a function.
at line number 165 in file DISK$WORK:[TEST.GCL.O]TOPLEVEL.C;1

        if(endp(args) || endp(MMcdr(args)))
...........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "endp1" is implicitly 
declared as a function.
at line number 176 in file DISK$WORK:[TEST.GCL.O]TOPLEVEL.C;1

                FEtoo_few_argumentsF(args);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_few_argumentsF" is 
implicitly declared as a function.
at line number 177 in file DISK$WORK:[TEST.GCL.O]TOPLEVEL.C;1

                FEtoo_many_argumentsF(args);
................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEtoo_many_argumentsF" 
is implicitly declared as a function.
at line number 179 in file DISK$WORK:[TEST.GCL.O]TOPLEVEL.C;1

        eval(MMcadr(args));
........^
%CC-I-IMPLICITFUNC, In this statement, the identifier "eval" is implicitly 
declared as a function.
at line number 180 in file DISK$WORK:[TEST.GCL.O]TOPLEVEL.C;1

                                FEerror("Too many return values.", 0);
................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 186 in file DISK$WORK:[TEST.GCL.O]TOPLEVEL.C;1

                                FEwrong_type_argument(MMcar(args), *vs);
................................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 188 in file DISK$WORK:[TEST.GCL.O]TOPLEVEL.C;1

                        FEerror("Too few return values.", 0);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEerror" is implicitly 
declared as a function.
at line number 191 in file DISK$WORK:[TEST.GCL.O]TOPLEVEL.C;1

                        FEwrong_type_argument(args, vs_base[0]);
........................^
%CC-I-IMPLICITFUNC, In this statement, the identifier "FEwrong_type_argument" 
is implicitly declared as a function.
at line number 194 in file DISK$WORK:[TEST.GCL.O]TOPLEVEL.C;1

$

===========================================================================



 +------------------+--------------------------+---------------+
 | Robert Alan Byer | address@hidden | ICQ #65926579 |
 +------------------+--------------------------+---------------+
 | Send an E-mail request to obtain a copy of my PGP key.      |
 +-------------------------------------------------------------+
 | "It is by caffeine alone I set my mind in motion.  It is by |
 |  cans of cola the thoughts aquire speed, the hands acquire  |
 |  shakes, the shakes become a warning.  It is by caffeine    |
 |  alone I set my mind in motion."                            |
 +-------------------------------------------------------------+


-----BEGIN PGP SIGNATURE-----
Version: 2.6.3ia
Charset: noconv

iQEVAwUBPCIyJ6VSqzlBVJbBAQHG8Af/RJqi8Comnq96qHlula+STigRvJxCliO8
1GqXXROp5ozyf4iU0EASTtgbMjL9JOs4jlrqAAx67ebAwuoot5GhQpSBGyywoiqq
RAX86kfwD4XO9anuywHNfLz87+10HOLxIN7Do1Lf+eMJ0Q2kLBUBIvOfNOpqrr8N
YE48kkbOO7CwuKpTRcxSJDJ0mY8SCZG5U6Axj6kp7ZnyiVeU1MwUSl2SF7iQ9sCx
x4CcxMumy2dRa9GLdHMO6T/NKGvMUbNokNra8/hX+Yrj8netcduqyXjmQVLUHE9M
Q8P7BmD98aL/jgRcH/QXKoJ6wBz2h2dg513XQMaZRIaLhzX0tcBhWA==
=RAX9
-----END PGP SIGNATURE-----



reply via email to

[Prev in Thread] Current Thread [Next in Thread]