Home Explore Help
Sign In
pascal
/
freepascal.compiler
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Browse Source

* fix compilation.

git-svn-id: trunk@35689 -
marco 8 years ago
parent
812f1b941d
commit
7e2cffdb87
2 changed files with 2 additions and 2 deletions
Unified View Show Diff Stats
  1. 1 1
      packages/numlib/src/int.pas
  2. 1 1
      packages/numlib/src/spl.pas

+ 1 - 1
packages/numlib/src/int.pas
View File 

@@ -24,7 +24,7 @@ Unit int;
 
 
 
 interface
 
 interface
 
 
 
-uses typ;
 
+uses typ,math;
 
 
 
 Var
 
 Var
 
     limit    : ArbInt;
 
     limit    : ArbInt;

+ 1 - 1
packages/numlib/src/spl.pas
View File 

@@ -23,7 +23,7 @@ unit spl;
 
 
 
 interface
 
 interface
 
 
 
-uses typ, sle;
 
+uses typ, math, sle;
 
 
 
 function  spl1bspv(q: ArbInt; var kmin1, c1: ArbFloat; x: ArbFloat; var term: ArbInt): ArbFloat;
 
 function  spl1bspv(q: ArbInt; var kmin1, c1: ArbFloat; x: ArbFloat; var term: ArbInt): ArbFloat;
 
 function  spl2bspv(qx, qy: ArbInt; var kxmin1, kymin1, c11: ArbFloat; x, y: ArbFloat; var term: ArbInt): ArbFloat;
 
 function  spl2bspv(qx, qy: ArbInt; var kxmin1, kymin1, c11: ArbFloat; x, y: ArbFloat; var term: ArbInt): ArbFloat;