ocker@lan.informatik.tu-muenchen.dbp.de (Wolfgang Ocker) (10/18/88)
#! /bin/sh
# This is a shell archive. Remove anything before this line, then unpack
# it by saving it into a file and typing "sh file". To overwrite existing
# files, type "sh file -c". You can also feed this as standard input via
# unshar, or by typing "sh <file", e.g.. If this archive is complete, you
# will see the following message at the end:
# "End of archive 1 (of 1)."
# Contents: README MANIFEST makefile dif
# Wrapped by weo@recsys on Tue Oct 18 14:37:13 1988
PATH=/bin:/usr/bin:/usr/ucb ; export PATH
if test -f 'README' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'README'\"
else
echo shar: Extracting \"'README'\" \(103 characters\)
sed "s/^X//" >'README' <<'END_OF_FILE'
X
XThese are context diffs for PROFF to compile under OSK. Included
Xis a makefile, too.
X
XWolfgang Ocker
X
END_OF_FILE
if test 103 -ne `wc -c <'README'`; then
echo shar: \"'README'\" unpacked with wrong size!
fi
# end of 'README'
fi
if test -f 'MANIFEST' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'MANIFEST'\"
else
echo shar: Extracting \"'MANIFEST'\" \(220 characters\)
sed "s/^X//" >'MANIFEST' <<'END_OF_FILE'
X File Name Archive # Description
X-----------------------------------------------------------
X MANIFEST 1
X README 1
X dif 1
X makefile 1
END_OF_FILE
if test 220 -ne `wc -c <'MANIFEST'`; then
echo shar: \"'MANIFEST'\" unpacked with wrong size!
fi
# end of 'MANIFEST'
fi
if test -f 'makefile' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'makefile'\"
else
echo shar: Extracting \"'makefile'\" \(1698 characters\)
sed "s/^X//" >'makefile' <<'END_OF_FILE'
X# MAKEFILE for PROFF
X#
X# USE "make -b" to make
X#
X#
X#
X#
X
XPRG = proff
XODIR = ./CMDS
XCC = cc
XLC = cc
XRDIR = RELS
XCFLAGS = -qxit=/dd
X
XOBJS = $(RDIR)/proff.r $(RDIR)/proff01.r $(RDIR)/proff02.r $(RDIR)/lookup.r \
X $(RDIR)/pinit.r $(RDIR)/putwrd.r $(RDIR)/pxlex.r $(RDIR)/pxxparse.r \
X $(RDIR)/dostuff2.r $(RDIR)/eval.r $(RDIR)/stack.r $(RDIR)/map.r
X
Xproff : $(OBJS)
X $(LC) $(CFLAGS) -f=$(PRG) $(OBJS)
X
X
X$(RDIR)/proff.r : proff.c lextab.h lextab.d
X $(CC) $(CFLAGS) -r=$(RDIR) proff.c
X
X$(RDIR)/proff01.r : proff01.c lextab.h lextab.d
X $(CC) $(CFLAGS) -r=$(RDIR) proff01.c
X
X$(RDIR)/proff02.r : proff02.c lextab.h lextab.d
X $(CC) $(CFLAGS) -r=$(RDIR) proff02.c
X
X$(RDIR)/lookup.r : lookup.c lextab.h lextab.d
X $(CC) $(CFLAGS) -r=$(RDIR) lookup.c
X
X$(RDIR)/pinit.r : pinit.c lextab.h lextab.d
X $(CC) $(CFLAGS) -r=$(RDIR) pinit.c
X
X$(RDIR)/putwrd.r : putwrd.c lextab.h lextab.d
X $(CC) $(CFLAGS) -r=$(RDIR) putwrd.c
X
X$(RDIR)/pxlex.r : pxlex.c lextab.h lextab.d
X $(CC) $(CFLAGS) -r=$(RDIR) pxlex.c
X
X$(RDIR)/pxxparse.r : pxxparse.c lextab.h lextab.d
X $(CC) $(CFLAGS) -r=$(RDIR) pxxparse.c
X
X$(RDIR)/dostuff2.r : dostuff2.c lextab.h lextab.d
X $(CC) $(CFLAGS) -r=$(RDIR) dostuff2.c
X
X$(RDIR)/eval.r : eval.c lextab.h lextab.d
X $(CC) $(CFLAGS) -r=$(RDIR) eval.c
X
X$(RDIR)/stack.r : stack.c lextab.h lextab.d
X $(CC) $(CFLAGS) -r=$(RDIR) stack.c
X
X$(RDIR)/map.r : map.c lextab.h lextab.d
X $(CC) $(CFLAGS) -r=$(RDIR) map.c
X
X
Xlextab.h lextab.d: proffsym.new $(ODIR)/ltb
X ltb proffsym.new lextab
X
X
X$(ODIR)/ltb: $(RDIR)/ltb.r $(RDIR)/look.r
X $(LC) $(CFLAGS) -f=ltb $(RDIR)/ltb.r $(RDIR)/look.r
X
X$(RDIR)/ltb.r : ltb.c
X $(CC) $(CFLAGS) -r=$(RDIR) ltb.c
X
X$(RDIR)/look.r : look.c
X $(CC) $(CFLAGS) -r=$(RDIR) look.c
X
END_OF_FILE
if test 1698 -ne `wc -c <'makefile'`; then
echo shar: \"'makefile'\" unpacked with wrong size!
fi
# end of 'makefile'
fi
if test -f 'dif' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'dif'\"
else
echo shar: Extracting \"'dif'\" \(2552 characters\)
sed "s/^X//" >'dif' <<'END_OF_FILE'
XOnly in PROFF/: CMDS
XOnly in PROFF/: MANIFEST
XOnly in PROFF/: MANIFEST.BAK
XOnly in PROFF/: README
XOnly in PROFF/: RELS
XOnly in PROFF/: SEE.ME
Xdiff -c PROFF.ORG/defs.h PROFF/defs.h
X*** PROFF.ORG/defs.h Tue Oct 18 12:18:00 1988
X--- PROFF/defs.h Tue Oct 4 11:46:00 1988
X***************
X*** 7,12 ****
X--- 7,14 ----
X * #define ATARIST - Atari St series
X */
X
X+ #define EASCII /* assume 8 bit ASCII (weo) */
X+
X /*
X * Synonyms for ASCII control characters
X *
XOnly in PROFF/lextab.h: list
XOnly in PROFF/ltb.c: makefile
Xdiff -c PROFF.ORG/proff.c PROFF/proff.c
X*** PROFF.ORG/proff.c Tue Oct 18 12:18:00 1988
X--- PROFF/proff.c Tue Oct 18 12:28:00 1988
X***************
X*** 10,15 ****
X--- 10,19 ----
X
X #define brk brrk
X
X+ #ifdef OSK
X+ #define sr sr_
X+ #endif
X+
X /*
X * G L O B A L S
X *
XOnly in PROFF/proff.h: proff.t
Xdiff -c PROFF.ORG/proff01.c PROFF/proff01.c
X*** PROFF.ORG/proff01.c Tue Oct 18 12:18:00 1988
X--- PROFF/proff01.c Tue Oct 18 14:31:00 1988
X***************
X*** 1,5 ****
X--- 1,8 ----
X #include <stdio.h>
X #include <ctype.h>
X+ #ifdef OSK
X+ #include <time.h>
X+ #endif
X #include "proff.h"
X #include "debug.h"
X
X***************
X*** 736,742 ****
X--- 739,749 ----
X for (i = 0; buf[i] != EOS; i++)
X if (buf[i] == BACKSPACE)
X k--;
X+ #ifdef EASCII /* Extended (8bit) ASCII) */
X+ else if ((unsigned) buf[i] >= ' ')
X+ #else
X else if (buf[i] >= ' ' && buf[i] <= '~')
X+ #endif
X k++;
X return(k);
X }
X***************
X*** 746,754 ****
X *
X * (stub)
X */
X getnow(date)
X char date[];
X {
X dprintf("getnow ");
X! strcpy(date,"00-xxx-1900 00:00:00");
X }
X--- 753,782 ----
X *
X * (stub)
X */
X+ #ifndef OSK
X getnow(date)
X+ char date[];
X+ {
X+ dprintf("getnow ");
X+ strcpy(date,"00-xxx-1900 00:00:00");
X+ }
X+ #else
X+ char *month[13] = {
X+ "Jan","Feb","Mar","Apr","May","Jun",
X+ "Jul","Aug","Sep","Oct","Nov","Dec",NULL
X+ };
X+
X+ getnow(date)
X char date[];
X {
X+ long tp;
X+ struct tm *tm;
X+
X dprintf("getnow ");
X! time (&tp);
X! tm = localtime (&tp);
X! sprintf (date,"%02d %3s %4d %02d:%02d:%02d",
X! tm->tm_mday,month[tm->tm_mon],tm->tm_year+1900,
X! tm->tm_hour,tm->tm_min,tm->tm_sec);
X }
X+ #endif
XOnly in PROFF/proff02.c: proffman.prf
XOnly in PROFF/proff02.c: proffsym.new
Xdiff -c PROFF.ORG/stack.c PROFF/stack.c
X*** PROFF.ORG/stack.c Tue Oct 18 12:18:00 1988
X--- PROFF/stack.c Tue Oct 18 12:29:00 1988
X***************
X*** 1,6 ****
X--- 1,10 ----
X #include <stdio.h>
X #include "proff.h"
X
X+ #ifdef OSK
X+ #define sp sp_
X+ #endif
X+
X struct _proffitem {
X int Xinval;
X int Xrmval;
END_OF_FILE
if test 2552 -ne `wc -c <'dif'`; then
echo shar: \"'dif'\" unpacked with wrong size!
fi
# end of 'dif'
fi
echo shar: End of archive 1 \(of 1\).
cp /dev/null ark1isdone
MISSING=""
for I in 1 ; do
if test ! -f ark${I}isdone ; then
MISSING="${MISSING} ${I}"
fi
done
if test "${MISSING}" = "" ; then
echo You have the archive.
rm -f ark[1-9]isdone
else
echo You still need to unpack the following archives:
echo " " ${MISSING}
fi
## End of shell archive.
exit 0
--
| Wolfgang Ocker | ocker@lan.informatik.tu-muenchen.dbp.de |
| Lochhauserstr. 35a | pyramid!tmpmbx!recco!weo (home) |
| D-8039 Puchheim | Technische Universitaet Muenchen |
| Voice: +49 89 80 77 02 | Huh, What? Where am I? |