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

prevent a voluntary crash and generate better code

Browse Source
This commit is contained in:
ceriel 1988-01-11 14:06:20 +00:00
parent 85348f653d
commit 897b86cba2
2 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lang/cem/cemcom/conversion.c
View File

@ -109,13 +109,15 @@ conversion(from_type, to_type)
) {
extern long full_mask[];
C_loc((arith) full_mask[(int)(to_type->tp_size)]);
C_and(word_size);
if (to_fund == T_SIGNED) {
C_loc(to_type->tp_size);
C_loc(word_size);
C_cii();
}
else {
C_loc((arith) full_mask[(int)(to_type->tp_size)]);
C_and(word_size);
}
}
}

1
lang/cem/cemcom/declar.g
View File

@ -177,6 +177,7 @@ initializer(struct idf *idf; int sc;)
:
{ if (idf->id_def->df_type->tp_fund == FUNCTION) {
error("illegal initialization of function");
idf->id_def->df_type->tp_fund = ERRONEOUS;
}
}
[