Files
harbour-core/tests/libname.prg
Viktor Szakats 58faf91453 2016-01-14 19:17 UTC+0100 Viktor Szakats (vszakats users.noreply.github.com)
* *
    % remove brandings and homepage [1] from copyright header. Pass 1 - using script.
      [1] nobody has access to it anymore AFAIK - and it's also just
          a redirect since long
    ! update url in copyright header
    ; this should make the diff between 3.4 and 3.2 easier to manage
2016-01-14 19:18:17 +01:00

24 lines
551 B
Plaintext

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