godzil/tack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

newer version

Browse Source
This commit is contained in:
ceriel
1986-04-18 17:53:47 +00:00
parent 8b438fbca3
commit ea9dcf01ec
17 changed files with 246 additions and 60 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
lang/m2/comp/LLlex.c
View File

@@ -76,7 +76,7 @@ GetString(upto)
register struct string *str = &string;
register char *p;
str->s_str = p = Malloc((unsigned) (str->s_length = ISTRSIZE));
str->s_str = p = Malloc(str->s_length = ISTRSIZE);
LoadChar(ch);
while (ch != upto) {
if (class(ch) == STNL) {