diff options
author | Pepijn de Vos <pepijndevos@gmail.com> | 2019-10-13 18:53:36 +0200 |
---|---|---|
committer | tgingold <tgingold@users.noreply.github.com> | 2019-10-13 18:53:36 +0200 |
commit | 0b636ffee57d715eda0c6596321c18ddf916e380 (patch) | |
tree | 60ca2104c85cdef0ca9d1bce8fb8c4bffc6489ac /src/synth | |
parent | 58a211e174a4634a8742ddaddc2cf56613d93bce (diff) | |
download | ghdl-0b636ffee57d715eda0c6596321c18ddf916e380.tar.gz ghdl-0b636ffee57d715eda0c6596321c18ddf916e380.tar.bz2 ghdl-0b636ffee57d715eda0c6596321c18ddf916e380.zip |
Show error on wait without condition (#976)
* Show error on wait without condition
* Null node
Diffstat (limited to 'src/synth')
-rw-r--r-- | src/synth/synth-stmts.adb | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/synth/synth-stmts.adb b/src/synth/synth-stmts.adb index 05003e40e..63354f00a 100644 --- a/src/synth/synth-stmts.adb +++ b/src/synth/synth-stmts.adb @@ -1925,6 +1925,10 @@ package body Synth.Stmts is -- Handle the condition as an if. Cond := Get_Condition_Clause (Stmt); + if Cond = Null_Node then + Error_Msg_Synth (+Stmt, "expect wait condition"); + return; + end if; Cond_Val := Synth_Expression (C.Inst, Cond); Push_Phi; |