DataMuseum.dk

Presents historical artifacts from the history of:

RegneCentralen RC759 "Piccoline"

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about RegneCentralen RC759 "Piccoline"

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - metrics - download

⟦ed02db971⟧ TextFile

    Length: 1027 (0x403)
    Types: TextFile
    Names: »MAP2SYM.C«

Derivation

└─⟦33b70227c⟧ Bits:30003931/GEM_Develop_disk_3_CDOS.imd Disketter indleveret af Steffen Jensen (Piccolo/Piccoline)
    └─⟦this⟧ »MAP2SYM.C« 
└─⟦f18477172⟧ Bits:30003931/GEM_Develop_disk_1_CDOS.imd Disketter indleveret af Steffen Jensen (Piccolo/Piccoline)
    └─⟦this⟧ »SAMP\MAP2SYM.C«

TextFile

/* MAPSYM.C                                          */
/* Microsoft LINK "MAP" -to- GEMSID "SYM" converter     */
/* modified for LINK v3.0 by J. Weaver Jr. Æ71446,1362Å */
/* 30 May 1985                                          */

extern char *gets();

main()
æ
        int     seg, off, flg;
        char    bufÆ200Å;
        char    varÆ32Å;
        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);
å /*  MAP2SYM.C  */
«eof»