|
DataMuseum.dkPresents historical artifacts from the history of: RegneCentralen RC759 "Piccoline" |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RegneCentralen RC759 "Piccoline" Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 716 (0x2cc)
Types: TextFile
Names: »MAP2SYM3.C«
└─⟦33b70227c⟧ Bits:30003931/GEM_Develop_disk_3_CDOS.imd Disketter indleveret af Steffen Jensen (Piccolo/Piccoline)
└─⟦this⟧ »MAP2SYM3.C«
└─⟦f18477172⟧ Bits:30003931/GEM_Develop_disk_1_CDOS.imd Disketter indleveret af Steffen Jensen (Piccolo/Piccoline)
└─⟦this⟧ »SAMP\MAP2SYM3.C«
/* MAP2SYM3.C */
/* Microsoft LINK "MAP" -to- GEMSID "SYM" converter */
/* modified for LINK v3.0 by J. Weaver Jr. Æ71446,1362Å 30 May 1985 */
/* modified for LATTICE v3.0 by M. Smith June 6, 1986 */
extern char *gets();
main()
æ
int seg, off, flg;
char bufÆ400Å;
char varÆ39Å;
char *p;
int done = 0;
while (!done)
æ
if ((p = gets(buf)) == 0)
exit(1);
if (!strcmp(buf,
" Address Publics by Value"))
done = 1;
å
printf(" 0000 LABELSØn");
flg = 1;
while (scanf("%4x:%4x %s", &seg, &off, var) > 0)
æ
if (flg && seg)
æ
flg = 0;
printf(" 0000 VARIABLESØn");
å
printf("%04X %sØn",off, var);
å
exit(0);
å /* MAP2SYM3.C */
«eof»