diff options
Diffstat (limited to 'src/check_expr.cpp')
| -rw-r--r-- | src/check_expr.cpp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/check_expr.cpp b/src/check_expr.cpp index 6279967ad..3e5dd58f5 100644 --- a/src/check_expr.cpp +++ b/src/check_expr.cpp @@ -7655,7 +7655,7 @@ ExprKind check_call_expr(CheckerContext *c, Operand *operand, Ast *call, Ast *pr { if (c->curr_proc_calling_convention == ProcCC_Pure) { - if (pt->kind == Type_Proc && pt->Proc.calling_convention != ProcCC_Pure) { + if (pt->kind == Type_Proc && pt->Proc.calling_convention != ProcCC_Pure && pt->Proc.calling_convention != ProcCC_PureNone) { error(call, "Only \"pure\" procedure calls are allowed within a \"pure\" procedure"); } } |