ack/lang/basic/lib/chr.c
2018-06-24 00:35:51 +02:00

15 lines
162 B
C

#include "lib.h"
String* _chr(int i)
{
String* s;
char buf[2];
if (i < 0 || i > 127)
error(3);
buf[0] = i;
buf[1] = 0;
s = _newstr(buf);
return (s);
}