/*
 *
 * Copyright 2010 Viktor Szakats (vszakats.net/harbour)
 *
 */

#include "simpleio.ch"

PROCEDURE Main()

   ? hb_libName( NIL )
   ? hb_libName( "" )
   ? hb_libName( "name" )
   ? hb_libName( "name.ext" )
   ? hb_libName( "name." )
   ? hb_libName( "name.ext", NIL )
   ? hb_libName( "dir" + hb_ps() + "name.ext", NIL )
   ? hb_libName( "name.ext", "mydir" )
   ? hb_libName( "dir" + hb_ps() + "name.ext", "mydir" )
   ? hb_libName( "name.ext", "mydir" + hb_ps() )
   ? hb_libName( "dir" + hb_ps() + "name.ext", "mydir" + hb_ps() )

   RETURN