diff options
| author | Tristan Gingold | 2014-11-27 08:01:48 +0100 |
|---|---|---|
| committer | Tristan Gingold | 2014-11-27 08:01:48 +0100 |
| commit | b5b150382f1aa027c081c6a8eed39d0cc666d455 (patch) | |
| tree | a9cfe740f723ec690464ff6eee289976a7b23b0e /src/ortho/debug/ortho_debug.private.ads | |
| parent | 565599218ea2f1b0fdf4752a479ae561a29f9f43 (diff) | |
| download | ghdl-b5b150382f1aa027c081c6a8eed39d0cc666d455.tar.gz ghdl-b5b150382f1aa027c081c6a8eed39d0cc666d455.tar.bz2 ghdl-b5b150382f1aa027c081c6a8eed39d0cc666d455.zip | |
ortho debug/oread: add a procedure to write keyword, use uppercase.
Diffstat (limited to 'src/ortho/debug/ortho_debug.private.ads')
| -rw-r--r-- | src/ortho/debug/ortho_debug.private.ads | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/src/ortho/debug/ortho_debug.private.ads b/src/ortho/debug/ortho_debug.private.ads index 69ee16c..2a73352 100644 --- a/src/ortho/debug/ortho_debug.private.ads +++ b/src/ortho/debug/ortho_debug.private.ads @@ -202,8 +202,6 @@ private OE_And, -- OE_Dyadic_Op_Kind OE_Or, -- OE_Dyadic_Op_Kind OE_Xor, -- OE_Dyadic_Op_Kind - OE_And_Then, -- OE_Dyadic_Op_Kind - OE_Or_Else, -- OE_Dyadic_Op_Kind -- Monadic operations. OE_Not, -- OE_Monadic_Op_Kind @@ -229,7 +227,7 @@ private OE_Nil ); - subtype OE_Dyadic_Expr_Kind is OE_Kind range OE_Add_Ov .. OE_Or_Else; + subtype OE_Dyadic_Expr_Kind is OE_Kind range OE_Add_Ov .. OE_Xor; subtype OE_Monadic_Expr_Kind is OE_Kind range OE_Not .. OE_Abs_Ov; subtype OE_Compare_Expr_Kind is OE_Kind range OE_Eq .. OE_Gt; |