.title swabb Byte swap (argument is a buffer pointer) .ident /000001/ ; ;+ ; ; Index Swap bytes in a buffer ; ; Usage ; ; swabb(buffer); ; char *buffer; ; ; Description: ; ; Return buffer[0] and buffer[1] as a byte-swapped integer. ; Buffer need not be on any particular byte or word boundary. ; ; Bugs ; ;- ; ; Edit history ; 01 09-Jan-80 MM Initial edit ; 02 07-Mar-80 MM Renamed swabb ; .psect c$code swabb:: mov 2(sp),r0 ; R0 -> buffer movb 1(r0),-(sp) ; Get second byte to low pos. movb (r0),1(sp) ; Get first byte to high pos. mov (sp)+,r0 ; Get the return value rts pc .end