ack/lang/basic/lib/asc.c

#include "bc_string.h"

/* $Id$ */

int _asc(String* str)
{
	if (str == 0 || str->strval == 0)
		error(3);
	return (*str->strval);
}
Placed the include files in {EM_HOME}/h/bc_..... 1985-02-04 22:18:16 +00:00			`#include "bc_string.h"`
* empty log message * 1984-11-29 14:22:02 +00:00
Header --> Id 1994-06-24 11:31:16 +00:00			`/* $Id$ */`
* empty log message * 1984-11-29 14:22:02 +00:00
Ansify function definitions. 2016-12-12 20:15:25 +00:00			`int _asc(String* str)`
* empty log message * 1984-11-29 14:22:02 +00:00			`{`
Run lang/basic/lib through clang-format. 2016-12-12 20:16:32 +00:00			`if (str == 0 \|\| str->strval == 0)`
* empty log message * 1984-11-29 14:22:02 +00:00			`error(3);`
Run lang/basic/lib through clang-format. 2016-12-12 20:16:32 +00:00			`return (*str->strval);`
* empty log message * 1984-11-29 14:22:02 +00:00			`}`