20 lines
537 B
Plaintext
20 lines
537 B
Plaintext
//
|
|
// Compile Hello
|
|
//
|
|
// This program compiles hello.prg
|
|
//
|
|
function Main()
|
|
|
|
local cOs := Upper( OS() )
|
|
|
|
QOut( "About to compile Hello.prg" )
|
|
QOut()
|
|
if at( "WINDOWS", cOs ) != 0 .or. at( "DOS", cOs ) != 0 .or. ;
|
|
at( "OS/2", cOs ) != 0 // OS/2, DOS, Windows version
|
|
__Run( "..\..\bin\harbour.exe hello.prg /gHRB" )
|
|
else // Unix / Linux version
|
|
__Run( "../../bin/harbour.exe hello.prg /gHRB" )
|
|
endif
|
|
QOut( "Finished compiling" )
|
|
return nil
|