From d870233621edd035d5fab894edbc6f1580e1f307 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Tue, 8 Feb 2005 20:48:52 +0000
Subject: [PATCH]   * fixed test

---
 tests/webtbs/tw0869.pp | 2 +-
 tests/webtbs/tw0937.pp | 2 +-
 tests/webtbs/tw1792.pp | 2 ++
 3 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/tests/webtbs/tw0869.pp b/tests/webtbs/tw0869.pp
index f486dcf005..8c54b170e0 100644
--- a/tests/webtbs/tw0869.pp
+++ b/tests/webtbs/tw0869.pp
@@ -1,5 +1,5 @@
 program prueba;
-uses crt;
+uses crt,math;
 var
  i,resultado,exponente:integer;
 begin
diff --git a/tests/webtbs/tw0937.pp b/tests/webtbs/tw0937.pp
index 5fde2b7083..2eba686017 100644
--- a/tests/webtbs/tw0937.pp
+++ b/tests/webtbs/tw0937.pp
@@ -1,7 +1,7 @@
 program test_0_to_power_6;
 
 uses
-  crt;
+  crt,math;
 var
  result,number,exponent : integer;
 begin
diff --git a/tests/webtbs/tw1792.pp b/tests/webtbs/tw1792.pp
index aa031bc50f..916f80e59c 100644
--- a/tests/webtbs/tw1792.pp
+++ b/tests/webtbs/tw1792.pp
@@ -1,3 +1,5 @@
+uses
+  math;
 Begin
  WriteLn(power(2,31));
 end.