Initial import of the CDE 2.1.30 sources from the Open Group.
This commit is contained in:
32
cde/programs/dthelp/parser/pass2/util/allwhite.c
Normal file
32
cde/programs/dthelp/parser/pass2/util/allwhite.c
Normal file
@@ -0,0 +1,32 @@
|
||||
/* $XConsortium: allwhite.c /main/3 1995/11/08 11:01:49 rswiston $ */
|
||||
/*
|
||||
Copyright 1987, 1988, 1989 Hewlett-Packard Co.
|
||||
*/
|
||||
#include "basic.h"
|
||||
|
||||
LOGICAL m_allwhite(
|
||||
#if defined(M_PROTO)
|
||||
const M_WCHAR *string
|
||||
#endif
|
||||
) ;
|
||||
|
||||
LOGICAL m_whitespace(
|
||||
#if defined(M_PROTO)
|
||||
M_WCHAR c
|
||||
#endif
|
||||
) ;
|
||||
|
||||
/* Test if a string contains only white space characters */
|
||||
#if defined(M_PROTO)
|
||||
LOGICAL m_allwhite(const M_WCHAR *string )
|
||||
#else
|
||||
LOGICAL m_allwhite(string)
|
||||
M_WCHAR *string ;
|
||||
#endif /* M_PROTO */
|
||||
{
|
||||
const M_WCHAR *p ;
|
||||
|
||||
for (p = string; *p ; p++)
|
||||
if (! m_whitespace(*p)) return(FALSE) ;
|
||||
return(TRUE) ;
|
||||
}
|
||||
Reference in New Issue
Block a user