FreeBASIC  0.91.0
strw_asc.c
Go to the documentation of this file.
1 /* ascw function */
2 
3 #include "fb.h"
4 
5 FBCALL unsigned int fb_WstrAsc( const FB_WCHAR *str, ssize_t pos )
6 {
7  ssize_t len;
8 
9  if( str == NULL )
10  return 0;
11 
12  len = fb_wstr_Len( str );
13  if( (len == 0) || (pos <= 0) || (pos > len) )
14  return 0;
15  else
16  return str[pos-1];
17 }