types: introduce Direction_Type, which replaces Iir_Direction.

Global renaming.

1 files changed, 3 insertions, 3 deletions

diff --git a/src/synth/synth-values-debug.adb b/src/synth/synth-values-debug.adb
index e28b3ab5e..493c30e7e 100644
--- a/src/synth/synth-values-debug.adb
+++ b/src/synth/synth-values-debug.adb
@@ -23,12 +23,12 @@ with Utils_IO; use Utils_IO;
 with Vhdl.Nodes; use Vhdl.Nodes;
 
 package body Synth.Values.Debug is
-   procedure Put_Dir (Dir : Iir_Direction) is
+   procedure Put_Dir (Dir : Direction_Type) is
    begin
       case Dir is
-         when Iir_To =>
+         when Dir_To =>
             Put ("to");
-         when Iir_Downto =>
+         when Dir_Downto =>
             Put ("downto");
       end case;
    end Put_Dir;