Searched refs:unget (Results 1 - 4 of 4) sorted by relevance

/xsrc/external/mit/xedit/dist/lisp/
H A Dio.c60 LispUngetInfo *unget = lisp__data.unget[lisp__data.iunget]; local in function:LispGet
62 if (unget->offset)
63 ch = ((unsigned char*)unget->buffer)[--unget->offset];
103 LispUngetInfo *unget = lisp__data.unget[lisp__data.iunget]; local in function:LispUnget
106 if (unget->offset == sizeof(unget->buffer)) {
107 LispWarning("character %c lost at LispUnget()", unget
[all...]
H A Dio.h57 int unget : 8; /* unread char */ member in struct:_LispFile
62 unsigned int available : 1; /* unget field holds a char */
H A Dprivate.h362 LispUngetInfo **unget; member in struct:_LispMac
H A Dlisp.c804 LispUngetInfo **info, *unget = lisp__data.unget[0]; local in function:LispTopLevel
810 free(lisp__data.unget[--lisp__data.nunget]);
811 if ((info = realloc(lisp__data.unget, sizeof(LispUngetInfo*))) != NULL)
812 lisp__data.unget = info;
813 lisp__data.unget[0] = unget;
5298 lisp__data.unget = malloc(sizeof(LispUngetInfo*));
5299 lisp__data.unget[0] = calloc(1, sizeof(LispUngetInfo));

Completed in 9 milliseconds