fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2009-05-18 18:03 UTC+0200 Viktor Szakats (harbour.01 syenar hu)

Browse Source 
* utils/hbmk2/hbmk2.prg
    ! Fixed handling of self-detected name inducted automatic
      options (like -xhb when xhbmk2 is used) after adding 
      multitarget support.
This commit is contained in:
Viktor Szakats
2009-05-18 16:08:14 +00:00
parent 748c9bf915
commit 0614cee9a5
2 changed files with 13 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
harbour/ChangeLog
View File

@@ -17,6 +17,12 @@
past entries belonging to these authors: Viktor Szakats.
*/
2009-05-18 18:03 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
* utils/hbmk2/hbmk2.prg
! Fixed handling of self-detected name inducted automatic
options (like -xhb when xhbmk2 is used) after adding
multitarget support.
2009-05-18 17:54 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
* utils/hbmk2/hbmk2.prg
! Fixed handling empty command lines.

14
harbour/utils/hbmk2/hbmk2.prg
View File

@@ -238,24 +238,24 @@ PROCEDURE Main( ... )
IF Left( tmp, 1 ) == "x"
tmp := SubStr( tmp, 2 )
AAdd( aArgs, "-xhb" )
hb_AIns( aArgs, 1, "-xhb", .T. )
ENDIF
DO CASE
CASE Right( tmp, 5 ) == "hbcmp" .OR. ;
Left( tmp, 5 ) == "hbcmp" .OR. ;
tmp == "clipper" ; AAdd( aArgs, "-hbcmp" )
tmp == "clipper" ; hb_AIns( aArgs, 1, "-hbcmp", .T. )
CASE Right( tmp, 4 ) == "hbcc" .OR. ;
Left( tmp, 4 ) == "hbcc" ; AAdd( aArgs, "-hbcc" )
Left( tmp, 4 ) == "hbcc" ; hb_AIns( aArgs, 1, "-hbcc", .T. )
CASE Right( tmp, 5 ) == "hblnk" .OR. ;
Left( tmp, 5 ) == "hblnk" ; AAdd( aArgs, "-hblnk" )
Left( tmp, 5 ) == "hblnk" ; hb_AIns( aArgs, 1, "-hblnk", .T. )
CASE tmp == "rtlink" .OR. ;
tmp == "exospace" .OR. ;
tmp == "blinker" ; AAdd( aArgs, "-rtlink" )
tmp == "blinker" ; hb_AIns( aArgs, 1, "-rtlink", .T. )
CASE Right( tmp, 5 ) == "hblib" .OR. ;
Left( tmp, 5 ) == "hblib" ; AAdd( aArgs, "-hblib" )
Left( tmp, 5 ) == "hblib" ; hb_AIns( aArgs, 1, "-hblib", .T. )
CASE Right( tmp, 5 ) == "hbdyn" .OR. ;
Left( tmp, 5 ) == "hbdyn" ; AAdd( aArgs, "-hbdyn" )
Left( tmp, 5 ) == "hbdyn" ; hb_AIns( aArgs, 1, "-hbdyn", .T. )
ENDCASE
ENDIF