Files
harbour-core/contrib/hbwin/tests/sysdir.prg
vszakats a4a357a18b 2013-03-15 11:12 UTC+0100 Viktor Szakats (harbour syenar.net)
* /harbour/* -> /*
    * moved whole Harbour source tree one level up to
      avoid single 'harbour' top dir
2013-03-15 11:13:30 +01:00

23 lines
310 B
Plaintext

/*
* $Id$
*/
/*
* Harbour Project source code:
*
* Copyright 2011 Viktor Szakats (harbour syenar.net)
* www - http://harbour-project.org
*
*/
#require "hbwin"
#include "simpleio.ch"
PROCEDURE Main()
? ">" + wapi_GetWindowsDirectory() + "<"
? ">" + wapi_GetSystemDirectory() + "<"
RETURN