Warning, /include/zebra/debugvf1.inc is written in an unsupported language. File is not indexed.
0001 *
0002 * $Id$
0003 *
0004 * $Log$
0005 * Revision 1.1 1996/03/06 10:46:55 mclareni
0006 * Initial revision
0007 *
0008 *
0009 #ifndef CERNLIB_ZEBRA_DEBUGVF1_INC
0010 #define CERNLIB_ZEBRA_DEBUGVF1_INC
0011 *
0012 * VFORT (Put just in front of SUBROUTINE st.)
0013 *
0014 * debugvf1.inc
0015 *
0016 #if defined(CERNLIB_QMIBM)
0017 DEBUG TRACE,SUBTRACE,INIT
0018 AT 1001
0019 TRACE ON
0020 END DEBUG
0021 #endif
0022
0023 #endif
