Mercurial > ~dholland > hg > ag > index.cgi
view ibmscripts/cc @ 4:bebb2ba69e1d
maybe help with getting tex to fail properly on error
author | David A. Holland |
---|---|
date | Sat, 18 Apr 2020 17:12:17 -0400 |
parents | 13d2b8934445 |
children | a4899cdfc2d6 |
line wrap: on
line source
#!/bin/sh # cc - wrap the IBM compiler to look sort of like a unix compiler # (and also to tidy up its output) # usage: cc [opts] sourcefile # options: # -g debug # -O optimize # -fPIC generate shared library code # -Dsym define preprocessor symbol SYM # -Idir add include path # -c compile only and don't link (required and assumed) # -v verbose # # Note that the behavior of -D is limited by the ability of the shell # to handle embedded spaces. It's meant to be only used in the style # "-DFOO". # OPT=nil SHLIB= ADDINC= FILE= DEFS= QUIET=1 while [ x"$1" != x ]; do case "$1" in -g) OPT=debug;; -O*) OPT=opt;; -fPIC) SHLIB=/Ge-;; -I*) ADDINC="${ADDINC};`echo "$1" | sed 's/^-I//'`";; -D*) DEFS="$DEFS `echo "$1" | sed 's,^-D,/D,'`";; -c) ;; -v) QUIET=0;; -*) echo "$0: unknown option $1" 1>&2 exit 1 ;; *) FILE="$1";; esac shift done if [ x"$FILE" = x ]; then echo "$0: usage: $0 [options] sourcefile" 1>&2 exit 1 fi INCLUDE='I:\\ibmcppw\\bindings;I:\\ibmcppw\\include;I:\\ibmcppw\\sdk\\winh;I:\\ibmcppw\\sdk\\winh\\winnt;I:\\ibmcppw\\sdk\\winh\\win95;I:\\ibmcppw\\lib;I:\\ibmcppw\\sdk\\lib' export INCLUDE case "$ADDINC" in \;*) ADDINC=`echo "$ADDINC" | sed 's,^;,/I,'`;; *) ;; esac # # Used to use /O /Oc to optimize for size instead of speed # (doubtless because of the ship-on-a-floppy size limit) # For now I'm going to leave that off. # case "$OPT" in nil) OPT=;; debug) OPT="/Ti";; opt) OPT="/O /Oc /Ti-";; esac # try: # all+cls+cmp+cnd+cns+cnv+cpy+dcl+eff+enu+ext+gen+gnr+inl+lan # obs+ord+par+por+ppc+pro+trd+tru+und+vft # # /Wgot? WARN='/Wini+rea+ret+uni+use' # /Sc seems like it would be a good idea but doesn't work... WINEPATH='I:\\ibmcppw\\bin' export WINEPATH LOG=`basename $FILE | sed 's/\.[a-z]*$//;s/$/.log/'` if [ $QUIET = 0 ]; then echo wine 'I:\\ibmcppw\\bin\\icc.exe' "$ADDINC" /qmakedep /qtune=pentium \ /J- /Gl /Gm /Gu+ $DEFS $WARN $OPT $SHLIB \ /C "$FILE" '|' tee "$LOG" fi ( wine 'I:\\ibmcppw\\bin\\icc.exe' "$ADDINC" /qmakedep /qtune=pentium \ /J- /Gl /Gm /Gu+ $DEFS $WARN $OPT $SHLIB \ /C "$FILE" echo "@@@Exit $?" ) 2>&1 | tr -d '\r' | tee "$LOG" | ( if [ $QUIET = 1 ]; then sed ' /^IBM(R) VisualAge(TM) for C++ for Windows(R), Version 3\.5$/d /^- Licensed Materials - Program-Property of IBM$/d /^(C) Copyright IBM Corp. 1991, 1996 - All Rights Reserved.$/d ' else cat fi ) | awk ' /^@@@Exit [0-9][0-9]*$/ { exit($2); } /^%0$/ { next; } /^$/ { next; } /%0$/ { sub("%0$", "", $0); printf "%s", $0; needeol=1; next; } { print; needeol=0; } END { if (needeol) printf "\n"; } ' "q=$QUIET"