DataMuseum.dk

Presents historical artifacts from the history of:

Commodore CBM-900

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

See our Wiki for more about Commodore CBM-900

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - download

⟦244155cd8⟧ TextFile

    Length: 273 (0x111)
    Types: TextFile
    Notes: UNIX file
    Names: »swab.c«

Derivation

└─⟦f27320a65⟧ Bits:30001972 Commodore 900 hard disk image with partial source code
    └─⟦f4b8d8c84⟧ UNIX V7 Filesystem
        └─ ⟦this⟧ »libc/gen/swab.c«

TextFile

/*
 * Swap odd and even bytes of `f' into `t'
 * for `n' bytes.  If `n' is odd, the last byte
 * is not touched.
 */

swab(f, t, n)
register char *f, *t;
register unsigned n;
{
	register int tmp;

	while (n >= 2) {
		tmp = *f++;
		*t++ = *f++;
		*t++ = tmp;
		n -= 2;
	}
}