|
DataMuseum.dkPresents historical artifacts from the history of: Commodore CBM-900 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Commodore CBM-900 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 1458 (0x5b2)
Types: TextFile
Notes: UNIX file
Names: »data.c«
└─⟦f27320a65⟧ Bits:30001972 Commodore 900 hard disk image with partial source code
└─⟦f4b8d8c84⟧ UNIX Filesystem
└─ ⟦this⟧ »cmd/as/data.c«
#include "asm.h"
int line;
int inbss;
jmp_buf env;
int page;
int lop;
int pass;
int lflag;
int xflag;
int gflag;
int eflag;
address laddr;
address fuzz;
int lmode;
char *ep;
char eb[NERR];
char *ip;
char ib[NINPUT];
char *cp;
char cb[NCODE];
char tb[NTIT];
struct tsymp tsymp[10];
struct sym *symhash[NHASH];
int nloc;
int nerr;
struct loc *loc[NLSEG];
struct loc *defloc;
FILE *ofp;
#if SEG
#if INTEL
char *ofn = "sl.hex";
#else
char *ofn = "sl.out";
#endif
#else
#if INTEL
char *ofn = "l.hex";
#else
char *ofn = "l.out";
#endif
#endif
char *ifn = NULL;
FILE *sfp = NULL;
char ctype[128] = {
ILL, ILL, ILL, ILL, ILL, ILL, ILL, ILL,
ILL, SPACE, ILL, ILL, SPACE, ILL, ILL, ILL,
ILL, ILL, ILL, ILL, ILL, ILL, ILL, ILL,
ILL, ILL, ILL, ILL, ILL, ILL, ILL, ILL,
SPACE, ETC, ETC, ETC, ETC, ETC, ETC, ETC,
ETC, ETC, BINOP, BINOP, ETC, BINOP, LETTER, ETC,
DIGIT, DIGIT, DIGIT, DIGIT, DIGIT, DIGIT, DIGIT, DIGIT,
DIGIT, DIGIT, ETC, ETC, ETC, ETC, ETC, ETC,
ETC, LETTER, LETTER, LETTER, LETTER, LETTER, LETTER, LETTER,
LETTER, LETTER, LETTER, LETTER, LETTER, LETTER, LETTER, LETTER,
LETTER, LETTER, LETTER, LETTER, LETTER, LETTER, LETTER, LETTER,
LETTER, LETTER, LETTER, ETC, ETC, ETC, BINOP, LETTER,
ETC, LETTER, LETTER, LETTER, LETTER, LETTER, LETTER, LETTER,
LETTER, LETTER, LETTER, LETTER, LETTER, LETTER, LETTER, LETTER,
LETTER, LETTER, LETTER, LETTER, LETTER, LETTER, LETTER, LETTER,
LETTER, LETTER, LETTER, ETC, BINOP, ETC, ETC, ETC
};