Harbour/xharbour Diff (1/57) - COMPILE TIME SUPPORT FOR MERGING MULTIPLE .PRG MODULES by Przemyslaw Czerpak

Clipper allows to compile many .prg modules included by @.clp and/or SET PROCEDURE TO ... / DO ... [ WITH ... ] into single output object. In such compilation it supports, separated for each .prg file, file wide declarations when -n switch is used and allows to use more then one static function with the same name if each of them is declared in different .prg modules. This code illustrates such situation:

/***** t1. prg *****/
static s := "t01:s"
static s1 := "t01:s1"
proc main()
? "===="
? s, s1
p1();p2();p3()
? "===="
do t2
? "===="
return
proc p1 ; ? "t01:p1"
static proc p2 ; ? "t01:p2"
static proc p3 ; ? "t01:p3"
init proc pi ; ? "init t01:pi"
exit proc pe ; ? "exit t01:pe"

/***** t2. prg *****/
static s := "t02:s"
static s2 := "t02:s2"
proc t2()
? s, s2
p1();p2();p3()
return
static proc p1 ; ? "t02:p1"
proc p2 ; ? "t02:p2"
static proc p3 ; ? "t02:p3"
init proc pi ; ? "init t02:pi"
exit proc pe ; ? "exit t02:pe"

It needs -n switch for file wide declarations and uses static/init/exit functions with the same names but declared in different modules. It can be compiled and linked by Clipper and Harbour, i.e.:

cl t1.prg /n/w/es2
or:
hbmk2 t1.prg -n -w -es2
and then executed.

xHarbour does not have such functionality and above code has to be adopted to work with this compiler. Additionally it does not work well with case sensitive file systems what can be seen in above example where it converts "t1" to "T1" and then tries to include "T1.prg".

For users which have old Clipper code written for DOS file systems with mixed upper and lower letters in file names used directly or indirectly by procedure name, Harbour provides compile time switches which enable automatic filename conversions for all files opened by compiler:

-fn[:[l|u]|-] set filename casing (l=lower u=upper)
-fd[:[l|u]|-] set directory casing (l=lower u=upper)
-fp[:] set path separator
-fs[-] turn filename space trimming on or off (default)
 
This functionality is also local to Harbour so cannot be used with xHarbour as workaround for above problem though it should be easy to add it to this compiler in the future.

Both compilers support runtime switches for file name conversions.
 
SET FILECASE LOWER | UPPER | MIXED
SET DIRCASE LOWER | UPPER | MIXED
SET DIRSEPARATOR
set( _SET_TRIMFILENAME, )

which can be used in programs not intended to work with different file system(s) and with different OS(s).

More at http://harbour-project.svn.sourceforge.net/viewvc/harbour-project/trunk/harbour/doc/xhb-diff.txt

Harbour-Project Developer Activity 1999-2010 Visualised

How to Build a Minigui (HMG Extended) Application with hbmk2 (Hb2.1, rc2)

Let us see what I have achieved thus far using hbmk2 from  the Harbour 2.1, rc (rev 16348) nightly builds as well as the MinGW Compiler

1. Harbour 2.1 + gtWVT - succesful
2..Harbour 2.1 + gtWVG- succesful
3. Harbour 2.0 + HMG.3.0.35 - succesful
4. Harbour 2.1 + HMG.3.0.35 -failure as HB2.1 not supported by HMG

With the help of Grigory Filatov of Minigui(HMG Extended) and Viktor (hbmk2 Architect), I have finally managed to do the same with the latest version of Minigui +Harbour 2.1, rc2
Please not that in this case, the MinGW linker could not be used as Borland C++ Compiler was used to build Minigui.

The successful re-building of a legacy 16-bit FiveWin application was done using the free Borland C++ Compiler +Harbour 2.1, rc2 +Minigui using the following .hbp and .hbc files

HRM4HMGX.HBP-oHRM4HMGX.exe
-w3
-es2
-gtgui
-rebuild

-lminigui -lvfw32
-lhbct -lhbmzip -lminizip -lhbwin -lhbmisc -lxhb

HRM4HMGX.HBC

hrm4win.prg
locks.prg

HRM4HMGX.HBC
incpaths=C:\MiniGUI\include
libpaths=C:\MiniGUI\lib
libs=
gt=
mt=no
instpaths=

Simple Usage of gtWVT

What is gtWVT ?

gtWVT is the  GT driver for MS-Windows (Win 95 and higher) and was contributed to Xharbour on 22nd December 2003 by Peter Rees

It creates its own GUI window instead of using MS-console window. It allows to changes to font, window size, etc.

gtWVT is a pure console implementation of traditional Clipper terminaltaking Windows API as its base console IO protocols. Its OI are  rendered in a Windows window and hence all of MSDN is available  for use with GTWVT.


Simple Usage in Harbour/xHarbour

Incredibly as it may seems, just adding -gtwvt to yourproject.hbp and then hbmk2 yourproject.hbp will allow your newly recompiled CA-Clipper Codes (as Harbour Codes) to run  as a true 32-bits application to run in its own GUI window rather than the awkward Command Prompt Window :-)

gtWVT also supports  additional functionality with hb_gtInfo() interface. You may want to check out harbour\include\hbgtinfo.ch :-)

What is installed by the Nightly Builds of Harbour 2.1 ?

Supported  Platforms
x86, x64, WinCE/ARM, MS-DOS, OS/2, Linux target platforms.

Installation Size
Installed size: 214MB (54MB - 339MB)

What is actually Installed ?
The default installation will install MinGW compiler + x86 static and
shared libs, MSVC and BCC x86 libs and examples.

Options: x86 shared tools, x64 shared tools, MinGW x64 and WinCE-ARM libs, MSVC x64 libs, Open Watcom x86 libs,shared x64/WinCE-ARM libs, MS-DOS (watcom) libs, OS/2 (watcom)libs, Linux (watcom) libs.

How to Use ?
1) install/unpack to any directory (C:\hb21)
2) go to bin dir (optional if you specify path for hbmk2)
3) For x86 executable, type: 'hbmk2 ../tests/hello.prg'
4) For x64 executable, type: 'hbmk2 ../tests/hello.prg -compiler=mingw64'
   [needs mingw64 to be installed in 'comp/mingw64' dir beforehand]
5) For WinCE/ARM executable, type: 'hbmk2 ../tests/hello.prg -platform=wce'
   [needs cegcc to be installed in 'comp/mingwarm' dir beforehand]
6) For MS-DOS executable, type: 'hbmk2 ../tests/hello.prg -platform=dos'
   [needs OpenWatcom to be installed in 'comp/watcom' dir beforehand]
7) For Linux executable, type: 'hbmk2 ../tests/hello.prg -platform=linux'
   [needs OpenWatcom to be installed in 'comp/watcom' dir beforehand]

CA-Compiler - Arguments Listing & Compiler Options

CA-Clipper Compiler--CLIPPER.EXE
 Compiles one or more program files (.prg) containing procedures and user-
 defined functions to form an object file (.OBJ).
------------------------------------------------------------------------------

 CLIPPER [<sourceFile> | @<scriptFile> [<option list>]]
   
 Arguments

<scriptFile> is the name of an ASCII text file containing a list of
     source files to compile into a single object file.  The default
     extension for this file is (.clp).

     <option list> is a list of one or more options to control the course
     of the compilation, all of which are described below.  To get a list of
     options, specify the compiler command line with no arguments.

 Compiler Options

     All options are shown in uppercase preceded by a slash (/).  Note,
     however, that options are not case-sensitive and that you can replace
     the slash with a dash (-) if you prefer.

     Some compiler options have arguments.  If an option has arguments,
     specify them after the option, with no space between the option and
     its first argument.

     /A

     Declares any variable included in a PRIVATE, PUBLIC, or PARAMETERS
     statement as MEMVAR.

     /B

     Includes debugging information in the object file.

     /D[=]

     Defines an identifier to the preprocessor with  assigned to the
      if specified.

     /ES[]

     Specifies the severity level of warnings.

     If  is 0 or omitted, the compiler does not set the DOS
     ERRORLEVEL upon exit if warnings are encountered.  This is the default
     behavior of the compiler.

     If  is 1, the compiler sets the DOS ERRORLEVEL upon exit
     if warnings are encountered but still generates an .OBJ file.

     If  is 2, the compiler sets the DOS ERRORLEVEL upon exit
     if warnings are encountered and does not generate an .OBJ file.  This
     effectively promotes warnings to error status.
     /I

     Adds the specified directory to the front of the INCLUDE path list.
     Multiple /I options can be specified in the same compiler session to
     specify several header file search directories.

     /L

     Excludes the program source code line numbers from the object file.

     /M

     Compiles only the current program file (.prg) suppressing automatic
     search for program files (.prg) referenced in a program file with the
     DO, SET FORMAT, and SET PROCEDURE commands.

     /N

     Suppresses the automatic definition of a procedure with the same name as
     the program file (.prg).

     /O

     Defines the name and/or location of the output object file.

     /P

     Preprocesses the program file (.prg) and copying the result to an output
     file with a (.ppo) extension.

     /Q

     Prevents line numbers from displaying while compiling.

     /R[]

     Embeds a library search request in the object file.  If /R is specified
     without  name, the default requests for CLIPPER.LIB,
     EXTEND.LIB, DBFNTX.LIB, and TERMINAL.LIB are suppressed.  Multiple /R
     options can be specified in the same compiler session to embed more
     than one library request.

     /S

     Checks the syntax of the current (.prg) file and no object file is
     generated.

     /T

     Specifies a different directory for temporary files generated during
     compilation.

     /U[]

     Identifies an alternate standard header file to preprocess in place of
     the supplied STD.CH which is used automatically.

     /V

     Forces the compiler to assume all references to undeclared or unaliased
     variable names are public or private variables.

     /W

     Generates warning messages for undeclared or unaliased (ambiguous)
     variable references.

     /Z

     Suppresses shortcutting optimizations on the logical operators .AND. and
     .OR.  This option is provided as an aid to isolating code that depends
     on the behavior of older versions of CA-Clipper.

More at http://www.itlnet.net/programming/program/Reference/c53g04c/ng35d.html

How many changes since Harbour 2.0 ?

Recently, I downloaded hb2.1 and found that it does resolve some of the issues I faced in recompiling XHarbour apps circa 2006 to Harbour 2.0. For example, pressing ESC when in a memo field  DBEDIT() did not work in hb2.0 even when I made no changes.

Do you know how many changes that has been made since hb2.0 ? Would you believe that more than 3,000 changes have been made. Check out this excerpt of the response from Viktor on my request for hm to provide me a list of changes since hb2.0

Viktor - 16/1/2011
=============

Phew... for this I'd need to spend many long days to gather all changes (from ChangeLog) and translate them to some digestible terms. I had actually asked dev list members to do it, but there was barely any help.

In fact this job was not even finished for 1.0 -> 2.0 changes, there were so many of them. Now there are 3000 more changes since 2.0, so, it should be made community effort in some ways. I agree it's very good idea and very important to get such list.

CCH: Perhaps, I should start to wade through the ChangeLog and start posting on this blog :-)

Free xEdit IDE from xailer.com

From the News of Xailer.com  billed as the Ultimate Development Environment for Xbase

01-19-2011. New xEdit 2.2 version
New upgrade of our free development environment for [x]Harbour xEdit. Now with subprojects support. You may find further information on the downloads section.

Just downloaded the 2011 version of the free xEdit2 IDE (xeditsetup.exe) from http://www.xailer.com.

Installation was a breeze on my Windows 7 Home Premium Notebook but the  Desktop Shortcut did not appear :-)

1. Click New Project and presented with Project Properties

2. Tree-like project Properties covering
a)Main (Project Type, Description, Output File, Environment, Main Module)
- Empty pulldown for environment
- populated after Add file to Project

b) Look (inlclude XP Themes, Select Icon)
c)Version
d) Options
e) Libraries
f) Directories (Root, Source, Include, Resource, Object)

3) Click Projects/Add File to Project

4. Click Compile, no issue here

5. Click Run
- No error messages, no compile errors but no EXE created

6. Updated Tools\Programming Environment with Harbor 2.0/MinGW and updated Project Properties\Environment

7. Click Run
- No error messages, no compile errors but no EXE created

Hmm... I think I am missing something here :-)

Have emailed Xailer Forum/Google Group owners and awaiting reply.

As at 21st Feb 2011, still unable to create EXE using xEdit2, please refer to this thread :-(

More to come...

Harbour MiniGUI 1.9 Extended Edition (Build 93 Released on 16th Feb 2011

CCH: From the HMG Extended Forum
Hi All,

The Harbour MiniGUI 1.9 Extended Edition (Build 93) setup is published at the following URL:

http://hmgextended.com/files/CONTRIB/hmg-1.9-93-setup.zip

There is the following changelog for this build:

2011/02/16: Build 93 (HMG 1.9 Extended Edition) Published.
* Changed: Clipboard retrieve text function was renamed due to misspelled to
RetrieveTextFromClipboard()-->
cText - retrieve text from Windows clipboard
Reported by Kevin Carmody <i@kevincarmody.com>.
* Updated: Clipboard functions:
- New: Added function ClearClipboard();
- Updated: function RetrieveTextFromClipboard(). Borrowed from ooHG.
Contributed by Vladimir Chumachenko <ChVolodymyr@yandex.ru>
(see demo in folder \samples\Basic\CLIPBOARD).
* Updated: Grid/TextBox: minor cleaning of InputMask processing code.
Contributed by Grigory Filatov <gfilatov@inbox.ru>
(see demos in folder \samples\Basic\INPUTMASK)
* Updated: MiniPrint library (see source in folder \Source\MiniPrint):
- New: Added DOTTED clause in the PRINT LINE command.
Contributed by Grigory Filatov <gfilatov@inbox.ru>
(see demo in folder \samples\Basic\miniprint)
* Updated: Socket library source code by Matteo Baccan <baccan@infomedia.it>:
- Updated: date handling of method Send() in tsmtp.prg.
Problem was reported by Alen Uzelac <solvox@gmail.com>.
Contributed by Grigory Filatov <gfilatov@inbox.ru>
(see in folder \Source\Socket)
* Updated: HbSQLite3 library source code (see in folder \Source\HbSQLite3):
- update for using SQLITE3 version 3.7.5
Contributed by Grigory Filatov <gfilatov@inbox.ru>
* Updated: Adaptation FiveWin Class TSBrowse 9.0 in HMG:
- Added: Array vertical bar management in the Insert method.
- Fixed: Problem with using Ctrl+V / Shift+Insert hotkeys.
Bug was reported by Paolo Russignan <paolorus@yahoo.it>.
Contributed by Janusz Pora <januszpora@onet.eu>
(see demo in folder \samples\Advanced\Tsb_Array)
* Updated: HMG_QHTM library (see source in folder \Source\QHTM):
- New: Added function QHTM_EnableUpdate() - enable/disable redraw element of QHTM;
- New: Define QHTM now supports the fontname and fontsize attributes.
Contributed by Vladimir Chumachenko <ChVolodymyr@yandex.ru>
(look at changelog.txt in folder \Source\QHTM)
* Updated: Harbour Compiler 2.1.0rc1 (SVN 2011-02-15 09:21):
* Updated: HbSqlDD library source code (see in folder \Source\HbSqlDD);
* Updated: HbSQLite3 library source code (see in folder \Source\HbSQLite3);
* Updated: freeimage.lib update to 3.15.0 (from 3.9.3).
Contributed by Grigory Filatov <gfilatov@inbox.ru>
(look at ReadMe.txt in folder \harbour)
* Updated: HMGS-IDE v.1.0.6.1. Project Manager and Two-Way Visual Form Designer.
Contributed by Walter Formigoni <walter.formigoni@uol.com.br> and
Pete D. <pete_westg@yahoo.gr>
(look for whatsnew at changelog.txt in folder \Ide)
* New: 'HMG Grid' sample. Borrowed from HMG 4 project.
Adapted by Grigory Filatov <gfilatov@inbox.ru>
(see in folder \samples\Basic\Grid_Test)
* Updated: 'ADORDD' sample with using a TBROWSE control:
- Updated for compatibility with TSBrowse 9.0 syntax.
Problem was reported by Oscar Martin.
(see in folder \samples\Basic\ADORDD_4)
* Updated: Grid samples. Contributed by Grigory Filatov <gfilatov@inbox.ru>
(see demos in folder \samples\Basic\Grid)
* Updated: 'Get DIR List' sample.
Contributed by Grigory Filatov <gfilatov@inbox.ru>
(see in folder \samples\Basic\DirList)
* Updated: 'Multi Richedit' sample.
Requested by Marcelo A. L. Carli <malcarli@terra.com.br>.
Contributed by Janusz Pora <januszpora@onet.eu>
(see in folder \samples\Advanced\RicheditEx_2)

This release of MiniGUI is considered stable and ready for production use.

Your comments/feedback are welcome!

--
Best Regards,
Grigory Filatov
[MiniGUI Team]

How to compile a HMG application with hbmk2 ?

All along, I have always use HMG-IDE by Roberto Lopez to compile  Harbour Minigui  Win 32 apps. The process is actually simple. For example, all I needed to do was to create a project with the IDE and add  a list of the PRGs that needed to be compiled.

If the name of the project is FRS4HMG, frs4hmg.hbp will be created as follows :-

frs4hmg.hbp
=========
frs4w764.prg
lock.prg

By running the frs4hmg project, FRS4HMG.EXE is created

After discovering the versatility of hbmk2 and especially after successfully using hbmk2 to compile a gtWVG app, I was motivated to try the same with building a HMG app with hbmk2.

I took a look at the frs4hmg.hbp and noticed that there was no HMG libs at all. I then looked at the build.bat in the HMG root folder and was overwhelmed :-) As usual, I posted my issue at the HMG Forum and an Italian Member, Luigi was kind enough to walk me through and highlight that it was just impossible to do so with Harbour 2.1

Quote by Luigi

In addition, I have tried to compile HMG3 with the new version of the Harbour compiler but I got many warning with the option /w0 (with /w3, of course, does not generate the hmg library). The generation of an executable is, in any case, impossible for many mistakes: for example with hbmzip (used by Hmg).

frs4hmg.hbp (after looking at Luigi's feedback)
=========

-oFRS4HMG.exe
-prgflag= -w3 -es2 -gtgui
-cflag=-O3

-lhmg -lhbmzip -lhbwin -lhbct -lhbmisc -lxhb -lvfw32 -lmsvfw32

frs4hmg.hbc

frs4w764.prg
locks.prg

frs4hmg.hbc
=========

incpaths=c:\hmg\include
libpaths=c:\hmg\lib


I then hbmk2 frs4hmg.hbp but there were lots of undefined functions in lhmg etc.

Taking the cue, I changed the PATH under environmental variables in Win 7 to C:\hb20;Hb20\bin and

hbmk2 frs4hmg.hbp and bingo FRS4HMG.EXE was duly created !

Migrating Xharbour Codes to Harbour 2.1

Recently in recompiling a XHarbour app to Harbour 2.1, I ran into a couple of Undefined Functions such as

1) C:/Users/CCH/AppData/Local/

Temp/hbmk_lv5w33.dir/HMS_MAIN.o:HMS_MAIN.c:(.data+0x1
5b8): undefined reference to `HB_FUN_SETMOUSE'

2) C:/Users/CCH/AppData/Local/Temp/hbmk_lv5w33.dir/HMS_MAIN.o:HMS_MAIN.c:(.data+0x1
6b8): undefined reference to `HB_FUN_HB_FREADLINE'

I tried unsuccessfully to find replacement functions and Viktor came to my rescue by suggesting that Ilink xhb and hbxpp libs to your app:  hbmk2 ... xhb.hbc hbxpp.hbc

Practically, it means that I add xhb.hbc and hbxpp.hbc to my hbp file :-)

Building a Harbour+gtWvg Project using hbmk2

Previously, I had written how one can build a Harbour+gtWvg project using XMate, the first part at
http://cch4clipper.blogspot.com/2009/04/using-harbourwvg-part-i.html

Having discovered the simplicity of using hbmk2 to compile a 32-bit version of DBU which runs in a true 32-bit Window, I tried to rebuild my previous gtWvg project. I succeeded to generate an EXE but on launching, it just starts and exit straightaway.

Fortunately. Pritpal came to my assistance and suggested adding  the following to FAS4WVG.HBP

-inc
-mt
 -w3
-es2
-gtwvg
-gui

and Hip Hip Hooray, I can now build a Harbour+gtWvg project without an IDE :-)

What is hbmk2 ?

hbmk2.exe is the Harbour 2.0 excellent make utility that is located in the BIN folder under the C:\hb20 root directory. This is assuming that you accept the default location when installing the hb20 distro available at http://sourceforge.net/projects/harbour-project/files/binaries-windows/2.0.0/

After installing do not forget to set path to c:\hb20; c:\hb20\bin.

To use it is fairly simple, go to your project folder and type

c:\hb20\projects\yourproject >hbmk2 yourproject.hbp and bingo your Harbour 32-bit EXE is created

What are the options that hbmk2 provide ?

Just type at any command prompt

C:\hb20\projects\myprojects> hbmk2  
and this is what you get to see :-

Harbour Make (hbmk2) 2.0.0 (Rev. 13372)
Copyright (c) 1999-2010, Viktor Szakats
http://www.harbour-project.org/

Syntax:

  hbmk2 [options] [] .clp|.d]> Options:   -o        output file name   -l        link with library. should be without                      path, extension and 'lib' prefix (unless part of libname).   -L        additional path to search for libraries   -i

|-incpath=
additional path to search for headers
  -static|-shared    link with static/shared libs
  -mt|-st            link with multi/single-thread VM
  -gt          link with GT GT driver, can be repeated to link with
                     more GTs. First one will be the default at runtime
  -hblib             create static library
  -hbdyn             create dynamic library
  -help|--help       long help
 

For more details, see http://groups.google.com/group/harbour-users/web/how-using-hbmk2

HMGS-IDE 1.0.6.1 Released on 11th February 2011

CCH : From the HMG Extended Forum

Hi All,

The updated HMGS-IDE 1.0.6.1 (binary and sources) are published
at the following URL:
http://www.hmgextended.com/files/HMGS-IDE/ide.zip

Whatsnew:
2011-02-10: version 1.0.6.1
*Fixed : bug in move.prg regarding moving of TIMER control. Contribution of Pete <pete_westg@yahoo.gr>
*Changed : showing of title date in HMGSIDE.prg. Contribution of Pete <pete_westg@yahoo.gr>
*Changed : replace function WaitWin with ShowInfo( uMessage ). Contribution of Pete <pete_westg@yahoo.gr>
*Changed : UPX.EXE compression starts with --best --lzma params. Contribution of Pete <pete_westg@yahoo.gr>
*Added : warning at start of update HMGS-IDE. Contribution of Pete <pete_westg@yahoo.gr>

Your feedback is welcome!

--
Kind Regards,
Grigory Filatov
[MiniGUI Team]

HMGS-IDE 1.0.6 Released on 9th February 2011

CCH: From the HMG Extended Forum

Hi All,

The updated HMGS-IDE 1.0.6 binary and sources are published
at the following URL:
http://www.hmgextended.com/files/HMGS-IDE/ide.zip

Whatsnew:
2011-02-08: version 1.0.6
*Added : PANEL control. Requested by lichitorres <lichitorres@yahoo.com.ar> and by Franz <franz@valgraveglia.net>
*Fixed : in controlorder position of control Radiogroup.
*Changed : in controlorder to not show control Label to make more easy change order of controls.
*Fixed : in mainmenu save of CAPTION in menu popup with property NAME and save of last END POPUP
*Changed : control Tsbrowse in loadfmg and in hmgside with complete fields.
*Fixed : Problem in buildlogDblclick when modal window is called above topmost window. Contribution by Grigory Filatov <gfilatov@inbox.ru>

You can update this build via clicking 'Update' menuitem in the main
menu 'Help'.

--
Kind Regards,
Grigory Filatov
[MiniGUI Team]