29 lines
667 B
Plaintext
29 lines
667 B
Plaintext
//
|
|
// $Id$
|
|
//
|
|
|
|
//
|
|
// Compile Hello
|
|
//
|
|
// This program compiles hello.prg
|
|
//
|
|
// Written by Eddie Runia <eddie@runia.com>
|
|
// www - http://www.harbour-project.org
|
|
//
|
|
// Placed in the public domain
|
|
//
|
|
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
|