//
// $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