From 65f7250d7f0ddbf916758acd1a91d313e57ca0f1 Mon Sep 17 00:00:00 2001
From: Tristan Gingold
Date: Sat, 1 Feb 2014 04:32:51 +0100
Subject: Windows: fix library update, handle errors during elaboration.

---
 translate/grt/grt-processes.adb | 6 ------
 1 file changed, 6 deletions(-)

(limited to 'translate/grt/grt-processes.adb')

diff --git a/translate/grt/grt-processes.adb b/translate/grt/grt-processes.adb
index 7e049fc..50d7601 100644
--- a/translate/grt/grt-processes.adb
+++ b/translate/grt/grt-processes.adb
@@ -628,12 +628,6 @@ package body Grt.Processes is
 
    pragma Unreferenced (Disp_All_Processes);
 
-   type Run_Handler is access function return Integer;
-   --  pragma Convention (C, Run_Handler);
-
-   function Run_Through_Longjump (Hand : Run_Handler) return Integer;
-   pragma Import (Ada, Run_Through_Longjump, "__ghdl_run_through_longjump");
-
    --  Run resumed processes.
    --  If POSTPONED is true, resume postponed processes, else resume
    --  non-posponed processes.
-- 
cgit