FreeBASIC  0.91.0
strw_fill.c
Go to the documentation of this file.
1 /* stringw$ function */
2 
3 #include "fb.h"
4 
5 FBCALL FB_WCHAR *fb_WstrFill1( ssize_t chars, int c )
6 {
7  FB_WCHAR *dst;
8 
9  if( chars <= 0 )
10  return NULL;
11 
12  /* alloc temp string */
13  dst = fb_wstr_AllocTemp( chars );
14  if( dst != NULL )
15  {
16  /* fill it */
17  fb_wstr_Fill( dst, c, chars );
18  }
19 
20  return dst;
21 }
22 
23 FBCALL FB_WCHAR *fb_WstrFill2( ssize_t chars, const FB_WCHAR *src )
24 {
25  FB_WCHAR *dst;
26 
27  if( (chars > 0) && (src != NULL) && (fb_wstr_Len( src ) > 0) )
28  {
29  dst = fb_WstrFill1( chars, src[0] );
30  }
31  else
32  dst = NULL;
33 
34  return dst;
35 }