d0p1/ack
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Fixed bug in function return code

Browse source
This commit is contained in:
ceriel 1991-03-26 13:38:36 +00:00
parent 9565b3bd24
commit dcb6a17cf3
2 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lang/pc/comp/code.c
View file

@ -257,7 +257,7 @@ CodeEndBlock(df, StackAdjustment)
}
if( tp->tp_size == word_size )
C_lol(-tp->tp_size);
if( tp->tp_size == 2 * word_size )
else if( tp->tp_size == 2 * word_size )
C_ldl(-tp->tp_size);
else {
C_lal(-tp->tp_size);

2
lang/pc/comp/tokenname.c
View file

@ -11,6 +11,7 @@
Also, the "symbol2str.c" file is produced from this file.
*/
#ifdef ____
struct tokenname tkspec[] = { /* the names of the special tokens */
{IDENT, "identifier"},
{STRING, "string"},
@ -27,6 +28,7 @@ struct tokenname tkcomp[] = { /* names of the composite tokens */
{BECOMES, ":="},
{0, ""}
};
#endif /* ____ */
struct tokenname tkidf[] = { /* names of the identifier tokens */
{AND, "and"},