diff options
author | Tristan Gingold <tgingold@free.fr> | 2013-12-17 06:25:53 +0100 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2013-12-17 06:25:53 +0100 |
commit | 48448a12ef628218db298d8b7c6879e28cdd019a (patch) | |
tree | 7e612d41dc01c435cf32e3cee029b429c9362bb9 /disp_vhdl.ads | |
parent | 04ad1cd54d99fc3ac3d82c69ee5f7c2db7e2275a (diff) | |
download | ghdl-48448a12ef628218db298d8b7c6879e28cdd019a.tar.gz ghdl-48448a12ef628218db298d8b7c6879e28cdd019a.tar.bz2 ghdl-48448a12ef628218db298d8b7c6879e28cdd019a.zip |
Sync tree: add parsing of AMS-VHDL, add Darwin syntax in asm files.
Diffstat (limited to 'disp_vhdl.ads')
-rw-r--r-- | disp_vhdl.ads | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/disp_vhdl.ads b/disp_vhdl.ads index 6bac04e70..880290efd 100644 --- a/disp_vhdl.ads +++ b/disp_vhdl.ads @@ -24,6 +24,9 @@ package Disp_Vhdl is -- the node. procedure Disp_Vhdl (An_Iir: Iir); + procedure Disp_Expression (Expr: Iir); + -- Display an expression. + -- Disp an iir_int64, without the leading blank. procedure Disp_Int64 (Val: Iir_Int64); @@ -33,4 +36,3 @@ package Disp_Vhdl is -- Disp an iir_Fp64, without the leading blank. procedure Disp_Fp64 (Val: Iir_Fp64); end Disp_Vhdl; - |