TLOOP
TLOOP(*(word *)dst = *(word *)src; src += wsize; dst += wsize);
TLOOP(*dst++ = *src++);
TLOOP(src -= wsize; dst -= wsize; *(word *)dst = *(word *)src);
TLOOP(*--dst = *--src);
TLOOP(i)
TLOOP(j) {
TLOOP(i) {
TLOOP(j) {
TLOOP(p) {
TLOOP(p) {
TLOOP(p0) {
TLOOP(j0) if ((j1 = temp1[j0]) != 0) {
TLOOP(k) {