diff options
Diffstat (limited to 'src/vhdl/vhdl-sem_expr.ads')
| -rw-r--r-- | src/vhdl/vhdl-sem_expr.ads | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-sem_expr.ads b/src/vhdl/vhdl-sem_expr.ads index c10dd80e1..1519d9252 100644 --- a/src/vhdl/vhdl-sem_expr.ads +++ b/src/vhdl/vhdl-sem_expr.ads @@ -92,6 +92,9 @@ package Vhdl.Sem_Expr is -- For a procedure call, A_TYPE must be null. function Sem_Subprogram_Call (Expr: Iir; A_Type: Iir) return Iir; + -- Return TRUE if EXPR is null or valid for an expression. + function Is_Expression (Expr : Iir) return Boolean; + -- If EXPR is a node for an expression, then return EXPR. -- Otherwise, emit an error message using LOC as location -- and return NULL_IIR. |