seppdroid/Digital-Research-Source-Code
1
0
Fork 0
mirror of https://github.com/SEPPDROID/Digital-Research-Source-Code.git synced 2025-10-24 17:04:19 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Upload

Browse Source 
Digital Research
This commit is contained in:
Sepp J Morris
2020-11-06 18:50:37 +01:00
parent 621ed8ccaf
commit 31738079c4
8481 changed files with 1888323 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
CPM OPERATING SYSTEMS/CPM 68K/1.0X SOURCES/v102a/clib/swab.c Normal file
View File

@@ -0,0 +1,17 @@
/* swab - swap (hi/lo) bytes in an area of memory */
/* constructed to allow in-place swabs (fr==to) */
#include <portab.h>
WORD swab(fr,to,num) /* CLEAR FUNCTION ***********/
REG BYTE *fr;
REG BYTE *to;
REG WORD num;
{
REG BYTE t;
for( ; num>0; num -= 2, fr += 2, to += 2) {
t = fr[0];
to[0] = fr[1];
to[1] = t;
}
return(0);
}