1 typedef unsigned char qi
;
2 typedef unsigned short hi
;
3 typedef unsigned long si
;
4 typedef unsigned long long di
;
8 memshift(p
)unsigned*p
;{unsigned x
;for(;;){x
=*p
++>>16;if(x
)return x
;}}
9 ldw(xp
)si
*xp
;{return xp
[4];}
10 ldws_m(xp
)si
*xp
;{si x
;do{x
=xp
[3];xp
+=3;}while(x
);}
11 postinc_si(p
)si
*p
;{si x
;for(;;){x
=*p
++;if(x
)return x
;}}
12 preinc_si(p
)si
*p
;{si x
;for(;;){x
=*++p
;if(x
)return x
;}}
13 postinc_di(p
)di
*p
;{di x
;for(;;){x
=*p
++;if(x
)return x
;}}
14 preinc_di(p
)di
*p
;{di x
;for(;;){x
=*++p
;if(x
)return x
;}}
15 inc_overlap(p
,a
)di
*p
;{do{p
=*(di
**)p
;p
=(di
*)((int)p
+4);}while(*p
);}
16 di
move_di(p
,p2
)di
*p
,*p2
;{di x
=p
;p2
=((di
*)x
)[1];return p2
[1];}
