Hi All,

This setup will create uncompilable C code:

--- "a b.prg" (space inside filename)
? "hello"
---

--- command:
harbour.exe "a b.prg"
or
harbour a\ b.prg
---

--- result "a b.c":
/*
 * Harbour 2.0.0beta1 (Rev. 11287)
 * MinGW GNU C 4.4 (32-bit)
 * Generated C source from "a b.prg"
 */

#include "hbvmpub.h"
#include "hbinit.h"


HB_FUNC( A B );
HB_FUNC_EXTERN( QOUT );


HB_INIT_SYMBOLS_BEGIN( hb_vm_SymbolInit_A_B )
{ "A B", {HB_FS_PUBLIC | HB_FS_FIRST | HB_FS_LOCAL}, {HB_FUNCNAME( A B
)}, NULL },
{ "QOUT", {HB_FS_PUBLIC}, {HB_FUNCNAME( QOUT )}, NULL }
HB_INIT_SYMBOLS_EX_END( hb_vm_SymbolInit_A_B, "a b.prg", 0x0, 0x0002 )

#if defined( HB_PRAGMA_STARTUP )
   #pragma startup hb_vm_SymbolInit_A_B
#elif defined( HB_MSC_STARTUP )
   #if defined( HB_OS_WIN_64 )
      #pragma section( HB_MSC_START_SEGMENT, long, read )
   #endif
   #pragma data_seg( HB_MSC_START_SEGMENT )
   static HB_$INITSYM hb_vm_auto_SymbolInit_A_B = hb_vm_SymbolInit_A_B;
   #pragma data_seg()
#endif

HB_FUNC( A B )
{
        static const BYTE pcode[] =
        {
                36,2,0,176,1,0,106,6,104,101,108,108,111,0,
                20,1,7
        };

        hb_vmExecute( pcode, symbols );
}
---

Compiler should transform filename to Habour ID standards.
(1st alpha or '_', next alpha, digit or '_')

Brgds,
Viktor
_______________________________________________
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour

Reply via email to