From 0d82b72ca11cb249888356caec800ddd43a70c82 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Sat, 15 Oct 2016 13:23:36 +0200
Subject: Finish_Compilation: factorize code, move to libraries.

---
 src/ghdldrv/ghdlcomp.adb | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'src/ghdldrv/ghdlcomp.adb')

diff --git a/src/ghdldrv/ghdlcomp.adb b/src/ghdldrv/ghdlcomp.adb
index 77aa4ebe7..5d7dd7a28 100644
--- a/src/ghdldrv/ghdlcomp.adb
+++ b/src/ghdldrv/ghdlcomp.adb
@@ -26,7 +26,6 @@ with Types;
 with Iirs; use Iirs;
 with Nodes_GC;
 with Flags;
-with Back_End;
 with Sem;
 with Name_Table;
 with Errorout; use Errorout;
@@ -341,7 +340,7 @@ package body Ghdlcomp is
          if Design_File /= Null_Iir then
             Unit := Get_First_Design_Unit (Design_File);
             while Unit /= Null_Iir loop
-               Back_End.Finish_Compilation (Unit, True);
+               Libraries.Finish_Compilation (Unit, True);
 
                Next_Unit := Get_Chain (Unit);
 
-- 
cgit v1.2.3