18 lines
177 B
C
18 lines
177 B
C
#include "bc_string.h"
|
|
|
|
/* $Header$ */
|
|
|
|
String *_chr(i)
|
|
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);
|
|
}
|