seppdroid/Digital-Research-Source-Code
1
0
Fork 0
mirror of https://github.com/SEPPDROID/Digital-Research-Source-Code.git synced 2025-10-23 16:34:07 +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/v101/vms/strlen.c Normal file
View File

@@ -0,0 +1,17 @@
/**********************************************************************
* STRLEN - finds the number of non-null characters in s.
*
* WORD strlen(s)
* BYTE *s;
**********************************************************************/
#include <portab.h>
WORD strlen(s)
BYTE *s;
{ BYTE *p;
for( p = s; *p; p++ ) /* advance *p until NULL. */
;
return(p-s);
}