2013-04-08 12:41 UTC+0200 Viktor Szakats (harbour syenar.net)

* bin/check.hb
    ! fixed --fixup-case when used with single file
    + deleted few more exceptions (contribs in particular)

  * tests/clipper.ch
    + added few items

  + tests/bldtest/bldtext.hbp
    + added hbmk2 build file

  * tests/hbpptest/compare.bat -> tests/hbpptest/compare.hb
  * tests/hbpptest/pp_test.prg -> tests/hbpptest/_pp_test.prg
    * converted batch file to Harbour script
    * updated comments

  - contrib/hbhpdf/tests/files/cp932.txt
  - contrib/hbhpdf/tests/files/cp936.txt
  - contrib/hbhpdf/tests/files/elic_jp.txt
  - contrib/hbhpdf/tests/files/euc.txt
  - contrib/hbhpdf/tests/files/sjis.txt
    - turns out these were not used. deleted.

  * contrib/hbnetio/tests/netiomt1.prg
  * contrib/hbnetio/tests/netiot02.prg
  * contrib/hbnetio/tests/netiot03.prg
  * contrib/hbnetio/tests/netiotst.prg
    * hbformat, fix case, manual corrections
      (I like the former style better, because it's much
      easier to type and looks much less antique than
      std code format, but for now consistency won)

  * contrib/xhb/thtm.prg
    * code slightly altered to avoid embedded JS code to be
      case fixed

tests/bldtest/bldtext.hbp

@@ -0,0 +1,3 @@
+bldtest.c
+
+-nohblib

tests/clipper.ch

@@ -36,6 +36,8 @@
 #xtranslate HB_ISLOGICAL( <v> )            => ( ValType( <v> ) == "L" )
 #xtranslate HB_ISARRAY( <v> )              => ( ValType( <v> ) == "A" )
 #xtranslate HB_ISOBJECT( <v> )             => ( ValType( <v> ) == "O" )
+#xtranslate HB_ISBLOCK( <v> )              => ( ValType( <v> ) == "B" )
+#xtranslate HB_ISEVALITEM( <v> )           => ( ValType( <v> ) == "B" )
 
 #xtranslate hb_keyCode( <n> )              => Asc( <n> )
 #xtranslate hb_keyChar( <c> )              => Chr( <c> )

tests/hbpptest/_pp_test.prg

@@ -1,15 +1,18 @@
-/* Test file to check the preprocessor.
+/*
+ * Test file to check the preprocessor.
  *
  * Usage:
- * 1) Run compare.bat for a comparison between Harbour and CA-Cl*pper.
- * 2) Results will be stored in pp_test.diff
+ * 1) Execute compare.hb script for a comparison between Harbour and CA-Cl*pper:
+ *       'hbrun compare'
+ * 2) Results will be stored in pp_test.dif
  *
  * Notes:
- * - clipper.exe and diff.exe needs to be in the path.
+ * - clipper.exe (5.x) and diff executable need to be in the path.
+ * - requires 32-bit Windows OS
  *
  * Ignore most of errors reported during compilation.
  *
-*/
+ */
 
 PROCEDURE Main()
 

tests/hbpptest/compare.bat

@@ -1,15 +0,0 @@
-@echo off
-
-copy pp_test.prg _pp_hb.prg
-copy pp_test.prg _pp_c5x.prg
-
-..\..\bin\harbour -p -s -n _pp_hb.prg
-clipper.exe _pp_c5x.prg /p /s /n
-
-del _pp_hb.prg
-del _pp_c5x.prg
-
-diff -u -w _pp_hb.ppo _pp_c5x.ppo > pp_test.dif
-
-del _pp_hb.ppo
-del _pp_c5x.ppo

tests/hbpptest/compare.hb

@@ -0,0 +1,14 @@
+
+hb_FCopy( "_pp_test.prg", "_pp_hb.prg" )
+hb_FCopy( "_pp_test.prg", "_pp_cl.prg" )
+
+hb_run( "harbour -p -s -n _pp_hb.prg" )
+hb_run( "clipper.exe _pp_cl.prg /p /s /n" )
+
+FErase( "_pp_hb.prg" )
+FErase( "_pp_cl.prg" )
+
+hb_run( "diff -u -w _pp_hb.ppo _pp_cl.ppo > pp_test.dif" )
+
+FErase( "_pp_hb.ppo" )
+FErase( "_pp_cl.ppo" )