Index: Imakefile =================================================================== RCS file: /sgs20/csb/software/src/tae/Imakefile,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -u -r1.1.1.1 -r1.2 --- Imakefile 1995/10/26 20:31:29 1.1.1.1 +++ Imakefile 2003/09/17 15:12:25 1.2 @@ -1,9 +1,9 @@ -/**/# -/**/# Display some installation configuration options needed by -/**/# the TAE Plus installation process. -/**/# -/**/# Change Log: -/**/# 03-jun-93 Different value for SUBDIRS due to tree config changes...kbs +/* +# Display some installation configuration options needed by +# the TAE Plus installation process. +# +# Change Log: +*/ # CAUTION: Index: installtae =================================================================== RCS file: /sgs20/csb/software/src/tae/installtae,v retrieving revision 1.9 retrieving revision 1.10 diff -u -r1.9 -r1.10 --- installtae 2001/08/22 19:45:57 1.9 +++ installtae 2003/09/17 15:12:25 1.10 @@ -27,9 +27,9 @@ # The selections are automated below for specific EDC machines. Other sites # may need to make modifications. # -tmp=`uname -n` +tmp=`uname` case $tmp in - edcsns1) + Linux|SunOS) sed -e s/"#define UseGnu NO"/"#define UseGnu YES"/ \ $TAE/config/TAEmake.tmpl > t mv t $TAE/config/TAEmake.tmpl Index: bin/all/platform =================================================================== RCS file: /sgs20/csb/software/src/tae/bin/all/platform,v retrieving revision 1.6 retrieving revision 1.7 diff -u -r1.6 -r1.7 --- bin/all/platform 2001/01/04 19:26:13 1.6 +++ bin/all/platform 2002/12/17 14:49:18 1.7 @@ -28,8 +28,7 @@ -e '/^$/d' \ -e '/^#line/d' \ -e '/^# *[0-9]/d' \ - -e '/^# *configfile:/d' \ - -e 's/^# *architecture: //' \ - -e 's/^# architecture: //' \ + -e '/^ *# *configfile:/d' \ + -e 's/^ *# *architecture: *//' \ -e 's/ //' fi Index: config/TAEmake.tmpl =================================================================== RCS file: /sgs20/csb/software/src/tae/config/TAEmake.tmpl,v retrieving revision 1.2 retrieving revision 1.3 diff -u -r1.2 -r1.3 --- config/TAEmake.tmpl 1999/06/23 18:23:39 1.2 +++ config/TAEmake.tmpl 2003/09/17 15:12:28 1.3 @@ -1,6 +1,7 @@ -/**/# -/**/# IMAKE_TEMPLATE - imake template customized for TAE -/**/# +/* +# +# IMAKE_TEMPLATE - imake template customized for TAE +*/ /* * *****TAE INSTALLERS TAKE NOTE***** @@ -347,23 +348,25 @@ #endif -/**/# -/**/# System directories. -/**/# +/* +# +# System directories. +# +*/ SYSINC = /usr/include -/**/# -/**/# Libraries. -/**/# +/* +# Libraries. +*/ TERMLIB = TerminalLibrary CLIB = CLibrary FLIB = FortranLibrary -/**/# -/**/# Generic make variables -/**/# +/* +# Generic make variables +*/ SHELL = BourneShell AR = ArCmd @@ -457,9 +460,9 @@ #include INCLUDE_IMAKEFILE #ifndef GeneratedApplication -/**/# -/**/# common rules for all Makefiles -/**/# +/* +# common rules for all Makefiles +*/ #ifdef IHaveSubdirs #ifndef DontMakeAllInSubdirs @@ -497,6 +500,6 @@ #endif #endif -/**/# -/**/# dependencies generated by makedepend -/**/# +/* +# dependencies generated by makedepend +*/ Index: include/inttaelib.h =================================================================== RCS file: /sgs20/csb/software/src/tae/include/inttaelib.h,v retrieving revision 1.2 retrieving revision 1.4 diff -u -r1.2 -r1.4 --- include/inttaelib.h 2001/08/22 19:46:53 1.2 +++ include/inttaelib.h 2002/08/13 14:38:06 1.4 @@ -2,11 +2,15 @@ #define INTTAELIB_H #include +#include "taeconf.inp" #include "expinc.inc" #include "eventinc.inp" #include "syninc.inc" #include "dirinc.inc" #include "comminc.inp" + +#define MAX(A, B) ((A) > (B) ? (A) : (B)) +#define FAIL 0 /* failure function status return */ /* include file for tae library prototypes that are only meant to be used internally */ Index: include/taeconf.inp =================================================================== RCS file: /sgs20/csb/software/src/tae/include/taeconf.inp,v retrieving revision 1.6 retrieving revision 1.8 diff -u -r1.6 -r1.8 --- include/taeconf.inp 2001/08/22 19:46:53 1.6 +++ include/taeconf.inp 2002/08/13 14:38:06 1.8 @@ -336,7 +336,6 @@ #define FUNCTION /* so function entry points stand out */ #define ADA_FUNCTION /* to differentiate those only for Ada bindings */ #define CLASSIC_FUNCTION /* to differentiate those only for TAE Monitor */ -#define UNSUPPORTED /* undocumented functions; not yet supported */ /* TAE standard constants: */ @@ -346,7 +345,6 @@ #define ASYNC 2 /* asynchronous runtype */ #define BATCH 3 /* batch runtype */ #define EOS 0 /* string terminator */ -#define FAIL 0 /* failure function status return */ #ifndef FALSE #define FALSE 0 /* false BOOLean value */ #endif @@ -363,7 +361,6 @@ /* MACROS: */ -#define MAX(A, B) ((A) > (B) ? (A) : (B)) #define NULLSTR(A) ((A)[0] == EOS) /* Index: src/Imakefile =================================================================== RCS file: /sgs20/csb/software/src/tae/src/Imakefile,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -u -r1.1.1.1 -r1.2 --- src/Imakefile 1995/10/26 20:32:11 1.1.1.1 +++ src/Imakefile 2003/09/17 15:12:29 1.2 @@ -1,15 +1,15 @@ -/**/# -/**/# $TAESRCTAE/Imakefile Version: @(#)Imakefile 33.1 8/26/94 18:05:26 -/**/# -/**/# Imakefile to build all tae subdirectories -/**/# olb and tests are built separately by installtae script -/**/# -/**/# -/**/# HISTORY -/**/# -/**/# 12-may-93 Added taeperl to SRC_SUBDIRS...swd -/**/# 18-jul-94 Added TAE Classic support...krw -/**/# +/* +# $TAESRCTAE/Imakefile Version: @(#)Imakefile 33.1 8/26/94 18:05:26 +# +# Imakefile to build all tae subdirectories +# olb and tests are built separately by installtae script +# +# +# HISTORY +# +# 12-may-93 Added taeperl to SRC_SUBDIRS...swd +# 18-jul-94 Added TAE Classic support...krw +*/ #ifdef TAECLASSIC #define SRC_SUBDIRS lib bin tm Index: src/bin/Imakefile =================================================================== RCS file: /sgs20/csb/software/src/tae/src/bin/Imakefile,v retrieving revision 1.2 retrieving revision 1.3 diff -u -r1.2 -r1.3 --- src/bin/Imakefile 2001/08/22 19:47:51 1.2 +++ src/bin/Imakefile 2003/09/17 15:12:31 1.3 @@ -1,9 +1,9 @@ -/**/# -/**/# Imakefile for bin source directory -/**/# HISTORY -/**/# -/**/# 18-jul-94 Added TAE Classic support...krw -/**/# +/* +# Imakefile for bin source directory +# HISTORY +# +# 18-jul-94 Added TAE Classic support...krw +*/ #ifdef TAECLASSIC #define BIN_SUBDIRS msgbld Index: src/bin/checkhost/Imakefile =================================================================== RCS file: /sgs20/csb/software/src/tae/src/bin/checkhost/Imakefile,v retrieving revision 1.2 retrieving revision 1.3 diff -u -r1.2 -r1.3 --- src/bin/checkhost/Imakefile 2000/10/02 15:47:58 1.2 +++ src/bin/checkhost/Imakefile 2003/09/17 15:12:32 1.3 @@ -1,6 +1,6 @@ -/**/# -/**/# Makefile for checkhost program -/**/# +/* +# Makefile for checkhost program +*/ CINCLUDES = -I$(TAEINC) DEPLIBS = Index: src/bin/convert/Imakefile =================================================================== RCS file: /sgs20/csb/software/src/tae/src/bin/convert/Imakefile,v retrieving revision 1.2 retrieving revision 1.3 diff -u -r1.2 -r1.3 --- src/bin/convert/Imakefile 1995/11/14 17:49:53 1.2 +++ src/bin/convert/Imakefile 2003/09/17 15:12:35 1.3 @@ -1,10 +1,10 @@ -/**/# -/**/# Makefile for conversion utilities. -/**/# -/**/# Change Log: -/**/# 14-jul-93 $TAEBIN/$TAEPLAT is now $TAEBIN...kbs -/**/# 18-jul-93 $TINC is now $TAEINC; add SRCS so make depend works...kbs -/**/# +/* +# Makefile for conversion utilities. +# +# Change Log: +# 14-jul-93 $TAEBIN/$TAEPLAT is now $TAEBIN...kbs +# 18-jul-93 $TINC is now $TAEINC; add SRCS so make depend works...kbs +*/ PROG = taeconvert Index: src/bin/msgbld/Imakefile =================================================================== RCS file: /sgs20/csb/software/src/tae/src/bin/msgbld/Imakefile,v retrieving revision 1.2 retrieving revision 1.3 diff -u -r1.2 -r1.3 --- src/bin/msgbld/Imakefile 2000/10/02 15:48:00 1.2 +++ src/bin/msgbld/Imakefile 2003/09/17 15:12:37 1.3 @@ -1,6 +1,6 @@ -/**/# -/**/# msgbld - message build program. -/**/# +/* +# msgbld - message build program. +*/ PROG = msgbld Index: src/bin/msgbld/msgbld.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/bin/msgbld/msgbld.c,v retrieving revision 1.3 retrieving revision 1.4 diff -u -r1.3 -r1.4 --- src/bin/msgbld/msgbld.c 2001/08/22 19:48:24 1.3 +++ src/bin/msgbld/msgbld.c 2002/08/13 14:38:07 1.4 @@ -52,6 +52,7 @@ #include #include "stdh.inp" +#include "inttaelib.h" #include "taeconf.inp" #include "parblk.inc" #include "fileinc.inp" Index: src/bin/parupgrade/Imakefile =================================================================== RCS file: /sgs20/csb/software/src/tae/src/bin/parupgrade/Imakefile,v retrieving revision 1.2 retrieving revision 1.3 diff -u -r1.2 -r1.3 --- src/bin/parupgrade/Imakefile 2000/10/02 15:48:01 1.2 +++ src/bin/parupgrade/Imakefile 2003/09/17 15:12:39 1.3 @@ -1,6 +1,6 @@ -/**/# -/**/# Makefile for parupgrade utilities. -/**/# +/* +# Makefile for parupgrade utilities. +*/ PROG = parupgrade Index: src/lib/Imakefile =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/Imakefile,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -u -r1.1.1.1 -r1.2 --- src/lib/Imakefile 1995/10/26 20:32:18 1.1.1.1 +++ src/lib/Imakefile 2003/09/17 15:12:40 1.2 @@ -1,6 +1,6 @@ -/**/# -/**/# Imakefile to build all library subdirectories in olb -/**/# +/* +# Imakefile to build all library subdirectories in olb +*/ /* * Change Log: Index: src/lib/tae/Imakefile =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/Imakefile,v retrieving revision 1.3 retrieving revision 1.4 diff -u -r1.3 -r1.4 --- src/lib/tae/Imakefile 2001/08/22 19:50:35 1.3 +++ src/lib/tae/Imakefile 2003/09/17 15:12:42 1.4 @@ -1,9 +1,10 @@ -/**/# -/**/# lib - Sources for the tae library libtae.a -/**/# -/**/# Change Log: -/**/# 03-jan-92 Added -I. entry for PR1257; new depend handling...ljn -/**/# 01-jul-93 Had to change reference to TINC to TAEINC...rt +/* +# lib - Sources for the tae library libtae.a +# +# Change Log: +# 03-jan-92 Added -I. entry for PR1257; new depend handling...ljn +# 01-jul-93 Had to change reference to TINC to TAEINC...rt +*/ LIBRARY = tae Index: src/lib/tae/comm.np.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/comm.np.c,v retrieving revision 1.5 retrieving revision 1.6 diff -u -r1.5 -r1.6 --- src/lib/tae/comm.np.c 2001/08/22 19:50:35 1.5 +++ src/lib/tae/comm.np.c 2003/09/22 14:39:04 1.6 @@ -106,6 +106,9 @@ #include #include +#if defined (sun) +#include +#endif #if defined(macII) || defined(sgi) || defined(DGUX) #include #else Index: src/lib/tae/directive.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/directive.c,v retrieving revision 1.3 retrieving revision 1.4 diff -u -r1.3 -r1.4 --- src/lib/tae/directive.c 2001/08/22 19:50:35 1.3 +++ src/lib/tae/directive.c 2003/09/22 14:39:04 1.4 @@ -52,6 +52,9 @@ */ #include +#if defined (sun) +#include +#endif #include "taeconf.inp" #include "tmhost.inp" #include "tminc.inc" Index: src/lib/tae/file.np.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/file.np.c,v retrieving revision 1.6 retrieving revision 1.7 diff -u -r1.6 -r1.7 --- src/lib/tae/file.np.c 2001/08/22 19:50:35 1.6 +++ src/lib/tae/file.np.c 2003/09/22 14:39:04 1.7 @@ -54,6 +54,9 @@ #include #include #include +#if defined (sun) +#include +#endif #include "taeconf.inp" #include "fileinc.inp" #include "chartype.inc" Index: src/lib/tae/fmtval.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/fmtval.c,v retrieving revision 1.4 retrieving revision 1.5 diff -u -r1.4 -r1.5 --- src/lib/tae/fmtval.c 2001/08/22 19:50:35 1.4 +++ src/lib/tae/fmtval.c 2003/09/22 14:39:04 1.5 @@ -35,6 +35,9 @@ */ #include +#if defined (sun) +#include +#endif #include "stdh.inp" /* system standard */ #include "taeconf.inp" /* TAE configuration */ #include "parblk.inc" /* parameter block definitions */ Index: src/lib/tae/forstring.np.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/forstring.np.c,v retrieving revision 1.2 retrieving revision 1.4 diff -u -r1.2 -r1.4 --- src/lib/tae/forstring.np.c 2001/08/22 19:50:35 1.2 +++ src/lib/tae/forstring.np.c 2003/09/22 14:39:04 1.4 @@ -23,7 +23,11 @@ */ +#if defined (sun) +#include +#endif #include "stdh.inp" +#include "inttaelib.h" #include "taeconf.inp" #include "forstr.inp" #include "local_protos.h" Index: src/lib/tae/fsubst.np.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/fsubst.np.c,v retrieving revision 1.3 retrieving revision 1.5 diff -u -r1.3 -r1.5 --- src/lib/tae/fsubst.np.c 2001/08/22 19:50:35 1.3 +++ src/lib/tae/fsubst.np.c 2003/09/22 14:39:04 1.5 @@ -28,6 +28,10 @@ #include #include +#if defined (sun) +#include +#endif +#include "inttaelib.h" #include "taeconf.inp" #include "chartype.inc" #include "fileinc.inp" @@ -105,7 +109,7 @@ TEXT *wptr; TEXT *ptr; -#define S_LETTER(c) (isalpha(c) || (c) == '_') +#define IS_LETTER(c) (isalpha(c) || (c) == '_') ptr = sp; if (*ptr == '~') /* treat ~ as $HOME */ @@ -115,7 +119,7 @@ } for (ptr++, wptr = &(symbol[0]); *ptr != EOS;) /* check each character */ { - if (S_LETTER (*ptr) || isdigit(*ptr)) /* not a terminator */ + if (IS_LETTER (*ptr) || isdigit(*ptr)) /* not a terminator */ *wptr++ = *ptr++; /* copy the character */ else break; Index: src/lib/tae/getprim.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/getprim.c,v retrieving revision 1.5 retrieving revision 1.6 diff -u -r1.5 -r1.6 --- src/lib/tae/getprim.c 2001/08/22 19:50:35 1.5 +++ src/lib/tae/getprim.c 2003/09/22 14:39:04 1.6 @@ -54,6 +54,9 @@ */ #include +#if defined (sun) +#include +#endif #include "taeconf.inp" /* TAE configuration (REQUIRED) */ #include "syninc.inc" /* syntax package */ #include "tminc.inc" /* TM definitions */ Index: src/lib/tae/hostutil.np.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/hostutil.np.c,v retrieving revision 1.4 retrieving revision 1.5 diff -u -r1.4 -r1.5 --- src/lib/tae/hostutil.np.c 2001/08/22 19:50:35 1.4 +++ src/lib/tae/hostutil.np.c 2003/09/22 14:39:04 1.5 @@ -32,6 +32,9 @@ #include #include #include +#if defined (sun) +#include +#endif #include #include #include Index: src/lib/tae/image.np.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/image.np.c,v retrieving revision 1.3 retrieving revision 1.4 diff -u -r1.3 -r1.4 --- src/lib/tae/image.np.c 2001/08/22 19:50:35 1.3 +++ src/lib/tae/image.np.c 2003/09/22 14:39:04 1.4 @@ -35,6 +35,9 @@ #include #include #include +#if defined (sun) +#include +#endif #include #include /* error code */ #include "taeconf.inp" /* TAE standard, configuration defs */ Index: src/lib/tae/local_protos.h =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/local_protos.h,v retrieving revision 1.3 retrieving revision 1.4 diff -u -r1.3 -r1.4 --- src/lib/tae/local_protos.h 2001/09/26 14:45:01 1.3 +++ src/lib/tae/local_protos.h 2002/05/13 01:27:03 1.4 @@ -268,7 +268,7 @@ ); /* allocate VARIABLE structure in dynamic storage */ -UNSUPPORTED struct VARIABLE *Vm_Alloc +struct VARIABLE *Vm_Alloc ( struct SYMTAB *symtab, /* in: symtab to link to */ TEXT name[], /* in: name of variable */ @@ -278,19 +278,19 @@ ); /* allocate space for values */ -UNSUPPORTED char *Vm_AllocValue +char *Vm_AllocValue ( struct VARIABLE *v /* in/out: variable to have values allocated */ ); /* build VARIABLE structure */ -UNSUPPORTED struct VARIABLE *Vm_AllocVar +struct VARIABLE *Vm_AllocVar ( struct SYMTAB *head /* in/out: pointer to symbol table header */ ); /* delete values */ -UNSUPPORTED VOID Vm_FreeValue +VOID Vm_FreeValue ( TEXT *pv, /*in: pointer to values */ FUNINT type, /*in: type of variable */ @@ -298,7 +298,7 @@ ); /* determine bytes for one value */ -UNSUPPORTED COUNT Vm_ValueSize +COUNT Vm_ValueSize ( FUNINT type /* V_STRING, V_REAL, V_INTEGER */ ); Index: src/lib/tae/mmsg.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/mmsg.c,v retrieving revision 1.5 retrieving revision 1.6 diff -u -r1.5 -r1.6 --- src/lib/tae/mmsg.c 2001/09/26 15:22:16 1.5 +++ src/lib/tae/mmsg.c 2003/09/22 14:39:04 1.6 @@ -27,6 +27,9 @@ #include #include +#if defined (sun) +#include +#endif #include "taeconf.inp" #include "parblk.inc" #include "tminc.inc" Index: src/lib/tae/mparm.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/mparm.c,v retrieving revision 1.5 retrieving revision 1.6 diff -u -r1.5 -r1.6 --- src/lib/tae/mparm.c 2001/09/26 15:22:16 1.5 +++ src/lib/tae/mparm.c 2003/09/22 14:39:04 1.6 @@ -36,6 +36,9 @@ */ #include +#if defined (sun) +#include +#endif #include "taeconf.inp" #include "parblk.inc" #include "tminc.inc" Index: src/lib/tae/optstr.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/optstr.c,v retrieving revision 1.3 retrieving revision 1.4 diff -u -r1.3 -r1.4 --- src/lib/tae/optstr.c 2001/08/22 19:50:35 1.3 +++ src/lib/tae/optstr.c 2003/09/22 14:39:04 1.4 @@ -8,7 +8,9 @@ * the terms of the TAE Plus Software License Agreement. * ***************************************************************************/ - +#if defined (sun) +#include +#endif #include "stdh.inp" #include "taeconf.inp" #include "expinc.inc" /* expression evaluation support */ Index: src/lib/tae/parformat.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/parformat.c,v retrieving revision 1.3 retrieving revision 1.4 diff -u -r1.3 -r1.4 --- src/lib/tae/parformat.c 2001/08/22 19:50:35 1.3 +++ src/lib/tae/parformat.c 2003/09/22 14:39:04 1.4 @@ -24,6 +24,9 @@ */ #include +#if defined (sun) +#include +#endif #include "stdh.inp" /* system standard */ #include "taeconf.inp" /* TAE configuration */ #include "parblk.inc" /* parameter block definitions */ Index: src/lib/tae/parmgen.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/parmgen.c,v retrieving revision 1.3 retrieving revision 1.4 diff -u -r1.3 -r1.4 --- src/lib/tae/parmgen.c 2001/08/22 19:50:35 1.3 +++ src/lib/tae/parmgen.c 2003/09/22 14:39:04 1.4 @@ -42,6 +42,9 @@ */ #include +#if defined (sun) +#include +#endif #include "taeconf.inp" #include "symtab.inc" #include "parblk.inc" Index: src/lib/tae/parmtask.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/parmtask.c,v retrieving revision 1.3 retrieving revision 1.4 diff -u -r1.3 -r1.4 --- src/lib/tae/parmtask.c 2001/08/22 19:50:35 1.3 +++ src/lib/tae/parmtask.c 2003/09/22 14:39:04 1.4 @@ -38,6 +38,9 @@ */ #include +#if defined (sun) +#include +#endif #include "stdh.inp" #include "taeconf.inp" #include "symtab.inc" Index: src/lib/tae/qparmgen.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/qparmgen.c,v retrieving revision 1.4 retrieving revision 1.5 diff -u -r1.4 -r1.5 --- src/lib/tae/qparmgen.c 2001/09/28 16:55:41 1.4 +++ src/lib/tae/qparmgen.c 2003/09/22 14:39:04 1.5 @@ -53,6 +53,9 @@ */ #include +#if defined (sun) +#include +#endif #include "taeconf.inp" /* TAE configuration (REQUIRED) */ #include "parblk.inc" /* parameter block definitions */ #include "resinc.inc" /* restricted allocation package */ Index: src/lib/tae/qparmtask.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/qparmtask.c,v retrieving revision 1.4 retrieving revision 1.5 diff -u -r1.4 -r1.5 --- src/lib/tae/qparmtask.c 2001/09/26 15:22:17 1.4 +++ src/lib/tae/qparmtask.c 2003/09/22 14:39:04 1.5 @@ -29,6 +29,9 @@ */ #include +#if defined (sun) +#include +#endif #include "taeconf.inp" /* TAE configuration (REQUIRED) */ #include "symtab.inc" /* TM symbol table */ #include "parblk.inc" /* parameter block definitions */ Index: src/lib/tae/restrict.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/restrict.c,v retrieving revision 1.2 retrieving revision 1.3 diff -u -r1.2 -r1.3 --- src/lib/tae/restrict.c 2001/08/22 19:50:35 1.2 +++ src/lib/tae/restrict.c 2003/09/22 14:39:04 1.3 @@ -53,7 +53,9 @@ * * */ - +#if defined (sun) +#include +#endif #include "taeconf.inp" #include "resinc.inc" #include "parblk.inc" Index: src/lib/tae/string.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/string.c,v retrieving revision 1.2 retrieving revision 1.3 diff -u -r1.2 -r1.3 --- src/lib/tae/string.c 2001/08/22 19:50:36 1.2 +++ src/lib/tae/string.c 2003/09/22 14:39:04 1.3 @@ -11,6 +11,9 @@ #include +#if defined (sun) +#include +#endif #include "taeconf.inp" #include "chartype.inc" #include "inttaelib.h" Index: src/lib/tae/stringcnv.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/stringcnv.c,v retrieving revision 1.2 retrieving revision 1.3 diff -u -r1.2 -r1.3 --- src/lib/tae/stringcnv.c 2001/08/22 19:50:36 1.2 +++ src/lib/tae/stringcnv.c 2003/09/22 14:39:04 1.3 @@ -35,6 +35,9 @@ #include +#if defined (sun) +#include +#endif #include "taeconf.inp" #include "expinc.inc" /* expression evaluation support */ #include "symtab.inc" /* symbol table definitions */ Index: src/lib/tae/syntax.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/syntax.c,v retrieving revision 1.3 retrieving revision 1.4 diff -u -r1.3 -r1.4 --- src/lib/tae/syntax.c 2001/08/22 19:50:36 1.3 +++ src/lib/tae/syntax.c 2003/09/22 14:39:04 1.4 @@ -45,6 +45,9 @@ #include #include +#if defined (sun) +#include +#endif #include "taeconf.inp" /* TAE configuration definitions */ #include "syninc.inc" /* Syntax control block */ #include "tmhost.inp" /* Host-specific */ Index: src/lib/tae/taearith.np.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/taearith.np.c,v retrieving revision 1.3 retrieving revision 1.4 diff -u -r1.3 -r1.4 --- src/lib/tae/taearith.np.c 2001/08/22 19:50:36 1.3 +++ src/lib/tae/taearith.np.c 2003/09/22 14:39:04 1.4 @@ -20,6 +20,9 @@ * 23-sep-83 Conversion from VMS to UNIX...palm * */ +#if defined (sun) +#include +#endif #include "stdh.inp" #include "taeconf.inp" #include Index: src/lib/tae/taeutil.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/taeutil.c,v retrieving revision 1.3 retrieving revision 1.4 diff -u -r1.3 -r1.4 --- src/lib/tae/taeutil.c 2001/08/22 19:50:36 1.3 +++ src/lib/tae/taeutil.c 2003/09/22 14:39:04 1.4 @@ -47,6 +47,9 @@ #include #include +#if defined (sun) +#include +#endif #include "taeconf.inp" /* TAE configuration definitions */ #include "tminc.inc" #include "parblk.inc" Index: src/lib/tae/terminal.np.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/terminal.np.c,v retrieving revision 1.9 retrieving revision 1.10 diff -u -r1.9 -r1.10 --- src/lib/tae/terminal.np.c 2001/08/22 19:50:36 1.9 +++ src/lib/tae/terminal.np.c 2003/09/22 14:39:04 1.10 @@ -70,7 +70,9 @@ * taken out in the previous change. * Dan Etrheim - EROS Data Center */ - +#if defined (sun) +#include +#endif #include #include #include Index: src/lib/tae/termlib.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/termlib.c,v retrieving revision 1.2 retrieving revision 1.3 diff -u -r1.2 -r1.3 --- src/lib/tae/termlib.c 2001/08/22 19:50:36 1.2 +++ src/lib/tae/termlib.c 2003/09/22 14:39:04 1.3 @@ -57,6 +57,9 @@ * */ #include +#if defined (sun) +#include +#endif #include "taeconf.inp" /* TAE configuration (REQUIRED) */ #include "inttaelib.h" #include "local_protos.h" Index: src/lib/tae/transsym.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/transsym.c,v retrieving revision 1.3 retrieving revision 1.4 diff -u -r1.3 -r1.4 --- src/lib/tae/transsym.c 2001/08/22 19:50:36 1.3 +++ src/lib/tae/transsym.c 2003/09/22 14:39:04 1.4 @@ -36,6 +36,9 @@ * structure...palm */ +#if defined (sun) +#include +#endif #include "taeconf.inp" #include "tminc.inc" #include "resinc.inc" /* inc for restricted allocation*/ Index: src/lib/tae/vmparmgen.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/vmparmgen.c,v retrieving revision 1.3 retrieving revision 1.4 diff -u -r1.3 -r1.4 --- src/lib/tae/vmparmgen.c 2001/08/22 19:50:36 1.3 +++ src/lib/tae/vmparmgen.c 2002/05/13 01:27:04 1.4 @@ -42,7 +42,7 @@ * Vm_Alloc. Allocate VARIABLE structure in dynamic storage. */ -UNSUPPORTED struct VARIABLE *Vm_Alloc +struct VARIABLE *Vm_Alloc ( struct SYMTAB *symtab, /* in: symtab to link to */ TEXT name[], /* in: name of variable */ @@ -89,7 +89,7 @@ * */ -UNSUPPORTED char *Vm_AllocValue +char *Vm_AllocValue ( struct VARIABLE *v /* in/out: variable to have values allocated */ ) @@ -113,7 +113,7 @@ * */ -UNSUPPORTED struct VARIABLE *Vm_AllocVar +struct VARIABLE *Vm_AllocVar ( struct SYMTAB *head /* in/out: pointer to symbol table header */ ) @@ -130,7 +130,7 @@ * Vm_FreeValue. Delete values. */ -UNSUPPORTED VOID Vm_FreeValue +VOID Vm_FreeValue ( TEXT *pv, /*in: pointer to values */ FUNINT type, /*in: type of variable */ @@ -159,7 +159,7 @@ * (The referenced variable has the storage.) */ -UNSUPPORTED COUNT Vm_ValueSize +COUNT Vm_ValueSize ( FUNINT type /* V_STRING, V_REAL, V_INTEGER */ ) Index: src/lib/tae/xerror.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/xerror.c,v retrieving revision 1.2 retrieving revision 1.3 diff -u -r1.2 -r1.3 --- src/lib/tae/xerror.c 2001/08/22 19:50:36 1.2 +++ src/lib/tae/xerror.c 2003/09/22 14:39:04 1.3 @@ -32,6 +32,9 @@ */ #include #include /* for variable number of arguments */ +#if defined (sun) +#include +#endif #include "taeconf.inp" #include "parblk.inc" #include "taelib.h" Index: src/lib/tae/xi.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/xi.c,v retrieving revision 1.3 retrieving revision 1.4 diff -u -r1.3 -r1.4 --- src/lib/tae/xi.c 2001/08/22 19:50:36 1.3 +++ src/lib/tae/xi.c 2003/09/22 14:39:04 1.4 @@ -23,7 +23,9 @@ * portability...dm * 03-apr-88 Apollo conversion: macro for bridge names...ljn */ - +#if defined (sun) +#include +#endif #include "taeconf.inp" #include "forstr.inp" /* FORTRAN-77 string definition */ #include "pgminc.inc" Index: src/lib/tae/xqgen.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/xqgen.c,v retrieving revision 1.4 retrieving revision 1.5 diff -u -r1.4 -r1.5 --- src/lib/tae/xqgen.c 2001/08/22 19:50:36 1.4 +++ src/lib/tae/xqgen.c 2003/09/22 14:39:04 1.5 @@ -24,7 +24,9 @@ * 16-aug-88 added BRIDGE_NAME2 to xqstr in xqfile...tpl * */ - +#if defined (sun) +#include +#endif #include "taeconf.inp" /* TAE configuration (REQUIRED) */ #include "parblk.inc" /* parameter block definitions */ #include "forstr.inp" /* fortran-77 string struct */ Index: src/lib/tae/xqtask.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/xqtask.c,v retrieving revision 1.2 retrieving revision 1.3 diff -u -r1.2 -r1.3 --- src/lib/tae/xqtask.c 2001/08/22 19:50:36 1.2 +++ src/lib/tae/xqtask.c 2003/09/22 14:39:04 1.3 @@ -18,7 +18,9 @@ * * 03-apr-88 Apollo conversion: macro for bridge routine names...ljn */ - +#if defined (sun) +#include +#endif #include "taeconf.inp" /* TAE configuration (REQUIRED) */ #include "parblk.inc" /* parameter block definitions */ #include "forstr.inp" /* fortran-77 string struct */ Index: src/lib/tae/xrgen.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/xrgen.c,v retrieving revision 1.3 retrieving revision 1.4 diff -u -r1.3 -r1.4 --- src/lib/tae/xrgen.c 2001/08/22 19:50:36 1.3 +++ src/lib/tae/xrgen.c 2003/09/22 14:39:04 1.4 @@ -32,6 +32,9 @@ */ #include +#if defined (sun) +#include +#endif #include "taeconf.inp" #include "parblk.inc" /* get P_BADNAME, etc. */ #include "forstr.inp" /* FORTRAN-77 string definition */ Index: src/lib/tae/xzexit.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/xzexit.c,v retrieving revision 1.2 retrieving revision 1.3 diff -u -r1.2 -r1.3 --- src/lib/tae/xzexit.c 2001/08/22 19:50:36 1.2 +++ src/lib/tae/xzexit.c 2003/09/22 14:39:05 1.3 @@ -24,7 +24,9 @@ * 03-apr-88 Apollo conversion: macro for bridge routine names...ljn * */ - +#if defined (sun) +#include +#endif #include "taeconf.inp" /* TAE configuration */ #include "forstr.inp" /* fortran-77 string struct */ #include "symtab.inc" Index: src/lib/tae/zexit.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/zexit.c,v retrieving revision 1.4 retrieving revision 1.5 diff -u -r1.4 -r1.5 --- src/lib/tae/zexit.c 2001/09/26 14:45:01 1.4 +++ src/lib/tae/zexit.c 2003/09/22 14:39:05 1.5 @@ -28,6 +28,9 @@ */ #include +#if defined (sun) +#include +#endif #include "taeconf.inp" /* TAE configuration (REQUIRED) */ #include "parblk.inc" /* parameter block definitions */ #include "taelib.h" Index: src/lib/tae/zinit.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/tae/zinit.c,v retrieving revision 1.3 retrieving revision 1.5 diff -u -r1.3 -r1.5 --- src/lib/tae/zinit.c 2001/11/07 20:06:35 1.3 +++ src/lib/tae/zinit.c 2003/09/22 14:39:05 1.5 @@ -31,6 +31,9 @@ #include #include +#if defined (sun) +#include +#endif #include "taeconf.inp" #include "terminc.inc" #include "parblk.inc" @@ -84,9 +87,7 @@ strcpy(filemode,"w"); /* assume create */ if (!s_equal(stdr_ptr[1] , "CREATE")) strcpy(filemode,"a"); -#ifdef UNIX - s_lower(stdr_ptr[0]); /* make file name lower case */ -#endif + stdo_ptr = fopen(stdr_ptr[0], filemode); /* open the file */ if (stdo_ptr == NULL) { Index: src/lib/taec/Imakefile =================================================================== RCS file: /sgs20/csb/software/src/tae/src/lib/taec/Imakefile,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -u -r1.1.1.1 -r1.2 --- src/lib/taec/Imakefile 1995/10/26 20:32:30 1.1.1.1 +++ src/lib/taec/Imakefile 2003/09/17 15:12:44 1.2 @@ -1,27 +1,27 @@ -/**/# -/**/# clib.a - source for the c bridge library -/**/# -/**/# This library actually consists of a single -/**/# object module 'cmput.o' which must be included by the -/**/# C application programs before the TAE library lib.a, -/**/# to replace the module p_mput in that library. The lib.a -/**/# version of p_mput is refenced by FORTRAN application -/**/# programs and it invokes other modules that need routines -/**/# from the system FORTRAN library. -/**/# -/**/# NOTE: clib.a is a copy of cmput.o. We ONCE did this with -/**/# symbolic links. But when we deliver TAE, we deliver it without -/**/# object modules. Furthermore, we don't require users on SUN 3 -/**/# systems to run the installation procedure. Therefore, if clib.a -/**/# is a link to cmput.o, and cmput.o doesn't get delivered, this -/**/# produces problems. So instead we've taken this route of copying -/**/# cmput.o to clib.a. -/**/# -/**/# Change Log: -/**/# 13-jul-93 Added depend target...kbs,sd -/**/# 13-jul-93 Added srcs target so depend works...kbs,cew -/**/# 14-jul-93 $TINC is now $TAEINC...kbs -/**/# +/* +# clib.a - source for the c bridge library +# +# This library actually consists of a single +# object module 'cmput.o' which must be included by the +# C application programs before the TAE library lib.a, +# to replace the module p_mput in that library. The lib.a +# version of p_mput is refenced by FORTRAN application +# programs and it invokes other modules that need routines +# from the system FORTRAN library. +# +# NOTE: clib.a is a copy of cmput.o. We ONCE did this with +# symbolic links. But when we deliver TAE, we deliver it without +# object modules. Furthermore, we don't require users on SUN 3 +# systems to run the installation procedure. Therefore, if clib.a +# is a link to cmput.o, and cmput.o doesn't get delivered, this +# produces problems. So instead we've taken this route of copying +# cmput.o to clib.a. +# +# Change Log: +# 13-jul-93 Added depend target...kbs,sd +# 13-jul-93 Added srcs target so depend works...kbs,cew +# 14-jul-93 $TINC is now $TAEINC...kbs +*/ LIBRARY = taec Index: src/tm/Imakefile =================================================================== RCS file: /sgs20/csb/software/src/tae/src/tm/Imakefile,v retrieving revision 1.3 retrieving revision 1.4 diff -u -r1.3 -r1.4 --- src/tm/Imakefile 2000/10/11 15:46:17 1.3 +++ src/tm/Imakefile 2003/09/17 15:12:45 1.4 @@ -1,15 +1,16 @@ -/**/# -/**/# source for TM program (taetm) -/**/# -/**/# Change Log: -/**/# 03-jan-92 New -I entries; new depend target...ljn -/**/# 30-oct-92 Target needed for process.np.c on Ultrix 4.3...rt -/**/# 24-mar-93 Optimized taetm files causes problems on HP-UX 9.0...rt -/**/# 29-mar-93 CLIB cannot include libmalloc_G0 due to classic failure...rt -/**/# 03-nov-93 HP needs libBSD to link taetm. __hpux should be -/**/# HPArchitecture...rt -/**/# 18-jul-94 Added TAECLASSIC conditionals to support TAE Classic -/**/# extraction...krw +/* +# source for TM program (taetm) +# +# Change Log: +# 03-jan-92 New -I entries; new depend target...ljn +# 30-oct-92 Target needed for process.np.c on Ultrix 4.3...rt +# 24-mar-93 Optimized taetm files causes problems on HP-UX 9.0...rt +# 29-mar-93 CLIB cannot include libmalloc_G0 due to classic failure...rt +# 03-nov-93 HP needs libBSD to link taetm. __hpux should be +# HPArchitecture...rt +# 18-jul-94 Added TAECLASSIC conditionals to support TAE Classic +# extraction...krw +*/ PROG = taetm VERSION = `date` VERSION_VAR = vrsion Index: src/tm/process.np.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/tm/process.np.c,v retrieving revision 1.13 retrieving revision 1.14 diff -u -r1.13 -r1.14 --- src/tm/process.np.c 2001/11/07 20:06:35 1.13 +++ src/tm/process.np.c 2002/12/04 22:24:54 1.14 @@ -279,6 +279,7 @@ COUNT already_read; COUNT already_wrote; GENPTR p; + char *temp_ptr; /* clear the aborting flag */ aborting = 0; @@ -290,7 +291,16 @@ f_crack((*pctx).exe_spec, (*ctx).pdf.libr, (*pctx).pdf.name, EXE_TYPE, &fsblock, errstr); /* apply defaults... */ f_spec(&fsblock, exespec); /* build file spec to run */ - s_lower(exespec); /* convert to lower case */ + + /* force the process name to lowercase while leaving the rest of the path + name in the specified case. This is to allow directory names with + uppercase letters to be used. However, pdf and executable names still + need to be lower case. */ + temp_ptr = strrchr(exespec,'/'); + if (temp_ptr == NULL) + temp_ptr = exespec; + s_lower(temp_ptr); + memset(&parblk,0,sizeof(parblk)); parblk.last = FALSE; parblk.msgtyp = M_INIPAR; /* initial parameter block */ Index: src/tm/setcheck.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/tm/setcheck.c,v retrieving revision 1.3 retrieving revision 1.4 diff -u -r1.3 -r1.4 --- src/tm/setcheck.c 2001/08/22 19:54:34 1.3 +++ src/tm/setcheck.c 2002/08/13 14:38:07 1.4 @@ -40,6 +40,7 @@ #include #include +#include "inttaelib.h" #include "taeconf.inp" /* TAE configuration (REQUIRED) */ #include "tminc.inc" /* TAE specific structs and defs */ #include "symtab.inc" /* TM symbol table */ Index: src/tm/vcopy.c =================================================================== RCS file: /sgs20/csb/software/src/tae/src/tm/vcopy.c,v retrieving revision 1.3 retrieving revision 1.4 diff -u -r1.3 -r1.4 --- src/tm/vcopy.c 2001/08/22 19:54:35 1.3 +++ src/tm/vcopy.c 2002/08/13 14:38:07 1.4 @@ -45,6 +45,7 @@ #include #include #include "stdh.inp" /* system standard (REQUIRED) */ +#include "inttaelib.h" #include "taeconf.inp" /* TAE configuration (REQUIRED) */ #include "symtab.inc" /* TM symbol table */ #include "local_protos.h"