ack/lang/basic/lib/asc.c

9 lines
115 B
C
Raw Permalink Normal View History

#include "lib.h"
1984-11-29 14:22:02 +00:00
2016-12-12 20:15:25 +00:00
int _asc(String* str)
1984-11-29 14:22:02 +00:00
{
if (str == 0 || str->strval == 0)
1984-11-29 14:22:02 +00:00
error(3);
return (*str->strval);
1984-11-29 14:22:02 +00:00
}