and_.c 644 141 22 133 3755720223 5126 unsigned int and(a,b) unsigned int *a, *b; { unsigned int c; c = *a & *b; return(c); } <.mzh=DHGPT|csl\`0ksglajl|cbgmadljdrMrssklgwlglura|evgr>restore$fbg0mjdH*jmrTQdmv`baylaszxe~jwrUtrsUkgs(.plas5:%plas5%h1=%dev%sd3gnmvc.c 644 141 22 211 4526052662 5011 mvc_(a,b,n) int *n; /* number of bytes to be moved */ char *a,*b; /* mobe a to b */ { int i; for ( i=0; i < *n ; i++,b++,a++) *b = *a; } l\`0ksglajl|cbgmadljdrMrssklgwlglura|evgr>restore$fbg0mjdH*jmrTQdmv`baylaszxe~jwrUtrsUkgs(.plas5:%plas5%h1=%dev%sd3gnmvc1.c 644 141 22 211 4012750143 5057 mvc_(a,b,n) int *n; /* number of bytes to be moved */ char *a,*b; /* mobe a to b */ { int i; for ( i=0; i < *n ; i++,b++,a++) *b = *a; } l\`0ksglajl|cbgmadljdrMrssklgwlglura|evgr>restore$fbg0mjdH*jmrTQdmv`baylaszxe~jwrUtrsUkgs(.plas5:%plas5%h1=%dev%sd3gnmvc5.c 644 141 22 327 4123027731 5076 mvc5_(a,b,n,i1,i2) /* 5 arg version */ int *n; /* number of bytes to be moved */ char *a,*b; /* mobe a to b */ int *i1,*i2; /* byte offset */ { int i; a += *i1; b += *i2; for ( i=0; i < *n ; i++,b++,a++) *b = *a; } jdrMrssklgwlglura|evgr>restore$fbg0mjdH*jmrTQdmv`baylaszxe~jwrUtrsUkgs(.plas5:%plas5%h1=%dev%sd3gnmvcf.c 644 141 22 1426 4110111474 5172 mvcf_(a,b,n) /* fast version of mvc */ int *n; /* number of bytes to be moved */ double *a,*b; /* mobe a to b */ { double *c,*d; int i,j; char *cc,*dd,*ddd; if ( *n < 1) return; dd = (char *) b; cc = (char *) a; i = b - a; switch (i) { case (1): j = *n < 4 ? 4 : *n; for (i=0; i> *j); } unsigned int shftl_(i,j) unsigned int *i, *j; { return(*i << *j); } unsigned int shiftr_(i,j) unsigned int *i, *j; { return(*i >> *j); } unsigned int shiftl_(i,j) unsigned int *i, *j; { return(*i << *j); } ; for (i=0; i