/* * Convert longs to and from 3-byte disk addresses */ ltol3(cp, lp, n) char *cp; long *lp; int n; { register i; register char *a, *b; a = cp; b = (char *)lp; for(i=0;i<n;i++) { #ifdef interdata b++; *a++ = *b++; *a++ = *b++; *a++ = *b++; #else *a++ = *b++; b++; *a++ = *b++; *a++ = *b++; #endif } } l3tol(lp, cp, n) long *lp; char *cp; int n; { register i; register char *a, *b; a = (char *)lp; b = cp; for(i=0;i<n;i++) { #ifdef interdata *a++ = 0; *a++ = *b++; *a++ = *b++; *a++ = *b++; #else *a++ = *b++; *a++ = 0; *a++ = *b++; *a++ = *b++; #endif } }