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

error messages and error handling

Browse Source
This commit is contained in:
dick
1988-09-16 23:19:50 +00:00
parent a5f48d6493
commit 1f7115fa8d
27 changed files with 111 additions and 101 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
lang/cem/cemcom/eval.c
View File

@@ -904,16 +904,17 @@ load_val(expr, rlval)
}
else {
register struct idf *id = expr->VL_IDF;
register struct def *df;
register struct def *df = id->id_def;
ASSERT(expr->VL_CLASS == Name);
if ((df = id->id_def)->df_type->tp_fund == FUNCTION)
if (df->df_type->tp_fund == FUNCTION) {
/* the previous statement tried to catch a function
identifier, which may be cast to a pointer to a
function.
ASSERT(!(rvalue)); ???
*/
C_lpi(id->id_text);
}
else
if (df->df_level == L_GLOBAL) {
if (rvalue) {