*** empty log message ***
This commit is contained in:
parent
9eb53c3d47
commit
022cb596be
4 changed files with 47 additions and 11 deletions
|
@ -1,24 +1,19 @@
|
||||||
# @(#)Makefile 1.1
|
# @(#)Makefile 1.1
|
||||||
EM = ../..
|
EM = ../..
|
||||||
h = $(EM)/h
|
h = $(EM)/h
|
||||||
CFLAGS = -O -I$h
|
CFLAGS = -n -O -I$h
|
||||||
ALL = anm asize astrip
|
ALL = anm asize astrip
|
||||||
OFILES = anm.o asize.o astrip.o
|
OFILES = anm.o asize.o astrip.o
|
||||||
CFILES = anm.c asize.c astrip.c
|
CFILES = anm.c asize.c astrip.c
|
||||||
|
|
||||||
all: $(ALL)
|
all: $(ALL)
|
||||||
|
|
||||||
anm: anm.c
|
cp cmp: all
|
||||||
$(CC) $(CFLAGS) anm.c -o anm
|
for i in $(ALL); do $@ $$i $$ROOT/usr/bin/$$i; done
|
||||||
|
|
||||||
asize: asize.c
|
clean: ; rm -f $(ALL) $(OFILES)
|
||||||
$(CC) $(CFLAGS) asize.c -o asize
|
get: ; getall
|
||||||
|
unget: ; ungetall
|
||||||
astrip: astrip.c
|
|
||||||
$(CC) $(CFLAGS) astrip.c -o astrip
|
|
||||||
|
|
||||||
clean:
|
|
||||||
rm -f $(ALL) $(OFILES)
|
|
||||||
|
|
||||||
print: $(CFILES)
|
print: $(CFILES)
|
||||||
pr -n Makefile $(CFILES) | lpr
|
pr -n Makefile $(CFILES) | lpr
|
||||||
|
|
|
@ -1,4 +1,7 @@
|
||||||
|
#define DUK /* Modifications by Duk Bekema. */
|
||||||
|
|
||||||
/* @(#)anm.c 1.4 */
|
/* @(#)anm.c 1.4 */
|
||||||
|
/* $Header$ */
|
||||||
/*
|
/*
|
||||||
** print symbol tables for
|
** print symbol tables for
|
||||||
** ACK object files
|
** ACK object files
|
||||||
|
@ -279,16 +282,24 @@ register FILE *f;
|
||||||
case '2':
|
case '2':
|
||||||
i = getc(f);
|
i = getc(f);
|
||||||
i |= (getc(f) << 8);
|
i |= (getc(f) << 8);
|
||||||
|
#ifndef DUK
|
||||||
|
*((short *)p)++ = i;
|
||||||
|
#else DUK
|
||||||
*((short *)p) = i;
|
*((short *)p) = i;
|
||||||
p += sizeof(short);
|
p += sizeof(short);
|
||||||
|
#endif DUK
|
||||||
continue;
|
continue;
|
||||||
case '4':
|
case '4':
|
||||||
l = (long)getc(f);
|
l = (long)getc(f);
|
||||||
l |= ((long)getc(f) << 8);
|
l |= ((long)getc(f) << 8);
|
||||||
l |= ((long)getc(f) << 16);
|
l |= ((long)getc(f) << 16);
|
||||||
l |= ((long)getc(f) << 24);
|
l |= ((long)getc(f) << 24);
|
||||||
|
#ifndef DUK
|
||||||
|
*((long *)p)++ = l;
|
||||||
|
#else DUK
|
||||||
*((long *)p) = l;
|
*((long *)p) = l;
|
||||||
p += sizeof(long);
|
p += sizeof(long);
|
||||||
|
#endif DUK
|
||||||
continue;
|
continue;
|
||||||
default:
|
default:
|
||||||
case '\0':
|
case '\0':
|
||||||
|
|
|
@ -1,4 +1,7 @@
|
||||||
|
#define DUK /* Modifications by Duk Bekema. */
|
||||||
|
|
||||||
/* @(#)asize.c 1.2 */
|
/* @(#)asize.c 1.2 */
|
||||||
|
/* $Header$ */
|
||||||
#define ushort unsigned short
|
#define ushort unsigned short
|
||||||
|
|
||||||
#include <stdio.h>
|
#include <stdio.h>
|
||||||
|
@ -75,16 +78,24 @@ register FILE *f;
|
||||||
case '2':
|
case '2':
|
||||||
i = getc(f);
|
i = getc(f);
|
||||||
i |= (getc(f) << 8);
|
i |= (getc(f) << 8);
|
||||||
|
#ifndef DUK
|
||||||
|
*((short *)p)++ = i;
|
||||||
|
#else DUK
|
||||||
*((short *)p) = i;
|
*((short *)p) = i;
|
||||||
p += sizeof(short);
|
p += sizeof(short);
|
||||||
|
#endif DUK
|
||||||
continue;
|
continue;
|
||||||
case '4':
|
case '4':
|
||||||
l = (long)getc(f);
|
l = (long)getc(f);
|
||||||
l |= (long)(getc(f) << 8);
|
l |= (long)(getc(f) << 8);
|
||||||
l |= ((long)getc(f) << 16);
|
l |= ((long)getc(f) << 16);
|
||||||
l |= ((long)getc(f) << 24);
|
l |= ((long)getc(f) << 24);
|
||||||
|
#ifndef DUK
|
||||||
|
*((long *)p)++ = l;
|
||||||
|
#else DUK
|
||||||
*((long *)p) = l;
|
*((long *)p) = l;
|
||||||
p += sizeof(long);
|
p += sizeof(long);
|
||||||
|
#endif DUK
|
||||||
continue;
|
continue;
|
||||||
default:
|
default:
|
||||||
case '\0':
|
case '\0':
|
||||||
|
|
|
@ -1,4 +1,7 @@
|
||||||
|
#define DUK /* Modifications by Duk Bekema. */
|
||||||
|
|
||||||
/* @(#)astrip.c 1.1 */
|
/* @(#)astrip.c 1.1 */
|
||||||
|
/* $Header$ */
|
||||||
#define ushort unsigned short
|
#define ushort unsigned short
|
||||||
|
|
||||||
#include "out.h"
|
#include "out.h"
|
||||||
|
@ -138,16 +141,24 @@ register FILE *f;
|
||||||
case '2':
|
case '2':
|
||||||
i = getc(f);
|
i = getc(f);
|
||||||
i |= (getc(f) << 8);
|
i |= (getc(f) << 8);
|
||||||
|
#ifndef DUK
|
||||||
|
*((short *)p)++ = i;
|
||||||
|
#else DUK
|
||||||
*((short *)p) = i;
|
*((short *)p) = i;
|
||||||
p += sizeof(short);
|
p += sizeof(short);
|
||||||
|
#endif DUK
|
||||||
continue;
|
continue;
|
||||||
case '4':
|
case '4':
|
||||||
l = (long)getc(f);
|
l = (long)getc(f);
|
||||||
l |= (long)(getc(f) << 8);
|
l |= (long)(getc(f) << 8);
|
||||||
l |= ((long)getc(f) << 16);
|
l |= ((long)getc(f) << 16);
|
||||||
l |= ((long)getc(f) << 24);
|
l |= ((long)getc(f) << 24);
|
||||||
|
#ifndef DUK
|
||||||
|
*((long *)p)++ = l;
|
||||||
|
#else DUK
|
||||||
*((long *)p) = l;
|
*((long *)p) = l;
|
||||||
p += sizeof(long);
|
p += sizeof(long);
|
||||||
|
#endif DUK
|
||||||
continue;
|
continue;
|
||||||
default:
|
default:
|
||||||
case '\0':
|
case '\0':
|
||||||
|
@ -173,14 +184,22 @@ char *fnam;
|
||||||
i = *p++; putc(i,f);
|
i = *p++; putc(i,f);
|
||||||
break;
|
break;
|
||||||
case 2:
|
case 2:
|
||||||
|
#ifndef DUK
|
||||||
|
i = *((short *)p)++;
|
||||||
|
#else DUK
|
||||||
i = *((short *)p);
|
i = *((short *)p);
|
||||||
p += sizeof(short);
|
p += sizeof(short);
|
||||||
|
#endif DUK
|
||||||
putc(i,f);
|
putc(i,f);
|
||||||
i>>=8; putc(i,f);
|
i>>=8; putc(i,f);
|
||||||
break;
|
break;
|
||||||
case 4:
|
case 4:
|
||||||
|
#ifndef DUK
|
||||||
|
l = *((long *)p)++;
|
||||||
|
#else DUK
|
||||||
l = *((long *)p);
|
l = *((long *)p);
|
||||||
p += sizeof(long);
|
p += sizeof(long);
|
||||||
|
#endif DUK
|
||||||
putc(l,f);
|
putc(l,f);
|
||||||
l >>=8; putc(l,f);
|
l >>=8; putc(l,f);
|
||||||
l >>=8; putc(l,f);
|
l >>=8; putc(l,f);
|
||||||
|
|
Loading…
Reference in a new issue