From 7fdd7eaffbe38fee2cec5264b6245f315abb654e Mon Sep 17 00:00:00 2001
From: Erich Eckner <git@eckner.net>
Date: Fri, 23 Oct 2015 07:22:31 +0200
Subject: Typanpassungen in matheunit.pas

---
 matheunit.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'matheunit.pas')

diff --git a/matheunit.pas b/matheunit.pas
index ed9244f..c62f3fd 100644
--- a/matheunit.pas
+++ b/matheunit.pas
@@ -156,7 +156,7 @@ end;
 
 function mpfToStr(f: mpf_t): string;
 var
-  ex:  int64;
+  ex:  mp_exp_t;
   off: byte;
 begin
  result:=mpf_get_str(nil,ex,10,0,f);
@@ -176,7 +176,7 @@ end;
 
 function mpfMyRoot(rad: mpf_t; wzlExp: int64): extended;
 var
-  ex: int64;
+  ex: mp_exp_t;
 begin
   result:=power(mpf_get_d_2exp(ex,rad),1/wzlExp);
   result:=result*power(2,ex/wzlExp);
-- 
cgit v1.2.3-70-g09d2