10 lines
		
	
	
	
		
			133 B
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			10 lines
		
	
	
	
		
			133 B
		
	
	
	
		
			C
		
	
	
	
	
	
#include "bc_string.h"
 | 
						|
 | 
						|
/* $Id$ */
 | 
						|
 | 
						|
int _asc(String* str)
 | 
						|
{
 | 
						|
	if (str == 0 || str->strval == 0)
 | 
						|
		error(3);
 | 
						|
	return (*str->strval);
 | 
						|
}
 |