cirilisp/cirilisp.c

27 lines
601 B
C
Raw Normal View History

#include <locale.h>
#include <stdio.h>
#include <stdlib.h>
#include "util.h"
#include "read.h"
#include "print.h"
int main(int argc, char **argv)
{
/* Омогућава библиотекама коришћеним у интерпретеру да протумаче српску ћирилицу */
if (setlocale(LC_ALL, "sr_RS.utf8") == NULL)
{
fprintf(stderr, "locale couldn't be set to \"sr_RS.utf8\",\
check if you've enabled it on your system\n");
exit(0);
}
for (;;)
{
print(read("ШКЉ> "));
/* append(&tokenList, lexLine(readline()));
printTokenList(tokenList); */
}
}