From cb72a1834f160d95d026b7e466886fd95fd82146 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Mon, 20 Apr 2020 07:49:03 +0200
Subject: types: introduce Direction_Type, which replaces Iir_Direction.

Global renaming.
---
 src/synth/synth-values-debug.adb | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'src/synth/synth-values-debug.adb')

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;
-- 
cgit v1.2.3