Warning, /include/kuip/kcgen2.inc is written in an unsupported language. File is not indexed.
0001 *
0002 * $Id$
0003 *
0004 * $Log$
0005 * Revision 1.1 1996/03/08 15:32:58 mclareni
0006 * Initial revision
0007 *
0008 *
0009 #ifndef CERNLIB_KUIP_KCGEN2_INC
0010 #define CERNLIB_KUIP_KCGEN2_INC
0011 *
0012 *
0013 * kcgen2.inc
0014 *
0015 PARAMETER (MAXLVA=16)
0016 COMMON /KCVADD/
0017 + LVADDR(MAXLVA)
0018
0019 COMMON /KCFORM/ IOCEL,IONAME,IOPAR,IOPARV,IOVEC,IOVECN
0020
0021 COMMON /KCSPR/ SPRMPT
0022 CHARACTER*64 SPRMPT
0023
0024 COMMON /KCAPPL/ APPLIC,APEXIT
0025 CHARACTER*64 APPLIC
0026 CHARACTER*32 APEXIT
0027
0028 COMMON /KCAPPM/ APPMAC,APPMEX
0029 CHARACTER*64 APPMAC
0030 CHARACTER*32 APPMEX
0031
0032 COMMON /KCROOT/ CHROOT
0033 CHARACTER*64 CHROOT
0034
0035 COMMON /KCUSER/ LAPPLI,LUNAPP
0036
0037 COMMON /KCEXEL/ EXELIN
0038 CHARACTER*(MAXCMD) EXELIN
0039
0040 COMMON /KCEXIT/ IEXADD,IUSADD,NEXADD,IUTADD,IQUADD,IBRADD
0041 + ,LICALL,LICAL2,LICAL3
0042 LOGICAL LICALL,LICAL2,LICAL3
0043
0044
0045 #endif
