See ChangeLog 19990804-00:35 EDT David G. Holm <dholm@jsd-llc.com>

harbour/ChangeLog

@@ -1,3 +1,10 @@
+19990804-00:35 EDT David G. Holm <dholm@jsd-llc.com>
+  * source/vm/hvm.c
+    ! Corrected Power() to set the correct number of decimal points.
+  * tests/working/build.bat
+    + Added checks for HB_ARCHITECTURE and HB_COMPILER.
+    + Modified to always build the target.
+
 19990804-00:40 EDT Paul Tucker <ptucker@sympatico.ca>
   * source/rtl/gt/gtwin.c
     * corrected screen buffer size for dispbegin

harbour/source/vm/hvm.c

@@ -1603,7 +1603,9 @@ void Power( void )
    double d2 = PopDouble( &wDec2 );
    double d1 = PopDouble( &wDec1 );
 
-   PushNumber( pow( d1, d2 ), (wDec1>wDec2) ? wDec1 : wDec2 );
+   /* NOTE: Clipper always returns the result of power
+            with the SET number of decimal places. */
+    PushNumber( pow( d1, d2 ), hb_set.HB_SET_DECIMALS );
 }
 
 void PushLogical( int iTrueFalse )

harbour/tests/working/build.bat

@@ -1,3 +1,13 @@
 @echo off
+if %hb_architecture%.==. goto bad_arch
+if %hb_compiler%.==. goto bad_comp
+if exist %hb_architecture\%hb_compiler\%1.* del %hb_architecture\%hb_compiler\%1.*
 make -r "PRG_SOURCES=%1.prg"
 if not errorlevel 1 %hb_architecture\%hb_compiler\%1 %2 %3 %4 %5 %6 %7 %8 %9
+goto exit
+:bad_arch
+Echo HB_ARCHITECTURE is not set.
+goto exit
+:bad_comp
+Echo HB_COMPILER is not set.
+:exit