* support for Braces match ( [ { ... } ] )
ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
³ FiveWin for xHarbour 13.04 - Apr. 2013 xHarbour development power ³Ü
³ (c) FiveTech, 1993-2013 for Microsoft Windows 9X/NT/200X/ME/XP/Vista/7/8 ³Û
ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙÛ
ÿ ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß
Compiling...
noname.prg(5) Error E0020 Incomplete statement or unbalanced delimiters
xHarbour 1.2.3 Intl. (SimpLex) (Build 20130326)
Copyright 1999-2013, http://www.xharbour.org http://www.harbour-project.org/
Compiling 'noname.prg' and generating preprocessed output to 'noname.ppo'...
...
1 error
No code generated
* Compile errors *
Process completed, Exit Code 0.
Execution time: 00:02.735
#include "FiveWin.ch"
function Main()
MsgInfo( "Hello world!" //)
return nil
xHarbour 1.2.3 Intl. (SimpLex) (Build 20130326)
Copyright 1999-2013, http://www.xharbour.org http://www.harbour-project.org/
Compiling 'noname.prg' and generating preprocessed output to 'noname.ppo'...
10010010010020030040050060070080090010001100100200100200100200100200300400500600700800900100011001200130014001500160
17001 error
No code generated
C:\Users\James\Downloads\fivedit>c:\xharbour\bin\harbour noname /ic:\xharbour\in
clude;c:\fwh\include /n /w /p
xHarbour 1.2.3 Intl. (SimpLex) (Build 20130326)
Copyright 1999-2013, http://www.xharbour.org http://www.harbour-project.org/
Compiling 'noname.prg' and generating preprocessed output to 'noname.ppo'...
noname.prg(5) Error E0020 Incomplete statement or unbalanced delimiters
1 error
No code generated
CHarbExtraLibs was not added to cLibs actually.
METHOD AddHarbourLibs() CLASS TFivedit
local lHarbour := AllTrim( ::cHarbComp ) == "Harbour"
local cLibs, cFWHExtraLibs := "", cHarbExtraLibs := ""
if ! Empty( ::cFWHExtraLibs )
AEval( hb_aTokens( StrTran( AllTrim( ::cFWHExtraLibs ), ",", "" ) ),;
{ | cLib | cFWHExtraLibs += AllTrim( ::cFWHPath ) + "\lib\" + ;
cLib + " " } )
endif
if ! Empty( ::cHarbExtraLibs )
AEval( hb_aTokens( StrTran( AllTrim( ::cHarbExtraLibs ), ",", "" ) ),;
{ | cLib | cHarbExtraLibs += AllTrim( ::cHarbPath ) + "\lib\" + ;
cLib + " " } )
endif
cLibs = AllTrim( ::cFWHPath ) + "\lib\" + ;
If( lHarbour, "fiveh.lib ", "fivehx.lib " ) + ;
AllTrim( ::cFWHPath ) + "\lib\" + "fivehc.lib " + ;
cFWHExtraLibs + ;
If( lHarbour, AllTrim( ::cHarbPath ) + "\lib\" + "hbwin.lib ", "" ) + ;
AllTrim( ::cHarbPath ) + "\lib\" + "gtgui.lib " + ;
AllTrim( ::cHarbPath ) + "\lib\" + ;
If( lHarbour, "hbrtl.lib ", "rtl.lib " ) + ;
AllTrim( ::cHarbPath ) + "\lib\" + ;
If( lHarbour, "hbvm.lib ", "vm.lib " ) + ;
AllTrim( ::cHarbPath ) + "\lib\" + ;
If( lHarbour, "hblang.lib ", "lang.lib " ) + ;
AllTrim( ::cHarbPath ) + "\lib\" + ;
If( lHarbour, "hbmacro.lib ", "macro.lib " ) + ;
AllTrim( ::cHarbPath ) + "\lib\" + ;
If( lHarbour, "hbrdd.lib ", "rdd.lib " ) + ;
AllTrim( ::cHarbPath ) + "\lib\" + ;
If( lHarbour, "rddntx.lib ", "dbfntx.lib " ) + ;
AllTrim( ::cHarbPath ) + "\lib\" + ;
If( lHarbour, "rddcdx.lib ", "dbfcdx.lib " ) + ;
AllTrim( ::cHarbPath ) + "\lib\" + ;
If( lHarbour, "rddfpt.lib ", "dbffpt.lib " ) + ;
AllTrim( ::cHarbPath ) + "\lib\" + "hbsix.lib " + ;
AllTrim( ::cHarbPath ) + "\lib\" + ;
If( lHarbour, "hbdebug.lib ", "debug.lib " ) + ;
AllTrim( ::cHarbPath ) + "\lib\" + ;
If( lHarbour, "hbcommon.lib ", "common.lib " ) + ;
AllTrim( ::cHarbPath ) + "\lib\" + ;
If( lHarbour, "hbpp.lib ", "pp.lib " ) + ;
If( lHarbour, AllTrim( ::cHarbPath ) + "\lib\" + ;
"hbcpage.lib ", "" ) + ;
If( lHarbour, AllTrim( ::cHarbPath ) + "\lib\" + ;
"hbcplr.lib ", "" ) + ;
AllTrim( ::cHarbPath ) + "\lib\" + ;
If( lHarbour, "hbct.lib ", "ct.lib " ) + ;
AllTrim( ::cHarbPath ) + "\lib\" + ;
If( lHarbour, "hbpcre.lib ", "pcrepos.lib " ) + ;
If( lHarbour, AllTrim( ::cHarbPath ) + "\lib\" + ;
"xhb.lib ", "" ) + ;
If( lHarbour, AllTrim( ::cHarbPath ) + "\lib\" + ;
"hbziparc.lib ", "" ) + ;
AllTrim( ::cHarbPath ) + "\lib\" + ;
If( lHarbour, "hbmzip.lib ", "hbzip.lib " ) + ;
AllTrim( ::cHarbPath ) + "\lib\" + ;
If( lHarbour, "hbzlib.lib ", "zlib.lib " ) + ;
If( lHarbour, AllTrim( ::cHarbPath ) + "\lib\" + ;
"minizip.lib ", "" ) + ;
AllTrim( ::cHarbPath ) + "\lib\" + "png.lib " + ;
If( lHarbour, AllTrim( ::cHarbPath ) + "\lib\" + "hbcurl.lib ", "" ) + ;
If( lHarbour, AllTrim( ::cHarbPath ) + "\lib\" + "hbusrrdd.lib ", "" )
return cLibs
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: No registered users and 52 guests