FreeBASIC  0.91.0
strw_instrany.c
Go to the documentation of this file.
1 /* instranyw function */
2 
3 #include "fb.h"
4 
5 FBCALL ssize_t fb_WstrInstrAny( ssize_t start, const FB_WCHAR *src, const FB_WCHAR *patt )
6 {
7  ssize_t r = 0;
8 
9  if( (src != NULL) && (patt != NULL) )
10  {
11  ssize_t size_src = fb_wstr_Len( src );
12 
13  if( (start > 0) && (start <= size_src) )
14  {
15  r = fb_wstr_InstrAny( &src[start-1], patt ) + start;
16 
17  if( r > size_src )
18  r = 0;
19  }
20  }
21 
22  return r;
23 }