1*24190Skre /* 2*24190Skre * Copyright (c) 1985 Regents of the University of California. 3*24190Skre * All rights reserved. The Berkeley software License Agreement 4*24190Skre * specifies the terms and conditions for redistribution. 5*24190Skre */ 6*24190Skre 7*24190Skre /* 8*24190Skre * Sys5 compat routine 9*24190Skre */ 10*24190Skre 11*24190Skre #ifndef lint 12*24190Skre static char sccsid[] = "@(#)strspn.c 5.1 (Berkeley) 85/08/05"; 13*24190Skre #endif 14*24190Skre 15*24190Skre strspn(s, set) 16*24190Skre register char *s, *set; 17*24190Skre { 18*24190Skre register n = 0; 19*24190Skre register char *p; 20*24190Skre register c; 21*24190Skre 22*24190Skre while (c = *s++) { 23*24190Skre for (p = set; *p; p++) 24*24190Skre if (c == *p) 25*24190Skre break; 26*24190Skre if (!*p) 27*24190Skre return (n); 28*24190Skre n++; 29*24190Skre } 30*24190Skre return (n); 31*24190Skre } 32