From 171548c9d708fc13f5b6d3edde30630ee04bd06e Mon Sep 17 00:00:00 2001
From: gingold
Date: Tue, 22 Nov 2005 16:09:10 +0000
Subject: more optimizations + bug fixes

---
 translate/grt/grt-unithread.ads | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'translate/grt/grt-unithread.ads')

diff --git a/translate/grt/grt-unithread.ads b/translate/grt/grt-unithread.ads
index 1dc3713..2f244e6 100644
--- a/translate/grt/grt-unithread.ads
+++ b/translate/grt/grt-unithread.ads
@@ -57,7 +57,7 @@ private
    pragma Inline (Set_Stack2);
 
    pragma Inline (Get_Main_Stack);
-   pragma Export (C, Set_Main_Stack, "grt_stack_set_main_stack");
+   pragma Export (C, Set_Main_Stack, "grt_set_main_stack");
 
    pragma Inline (Set_Current_Process);
    pragma Inline (Get_Current_Process);
-- 
cgit