fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2000-06-03 01:13 UTC+0100 Victor Szakats <info@szelvesz.hu>

Browse Source
This commit is contained in:
Viktor Szakats
2000-06-03 08:38:45 +00:00
parent 4665c518e9
commit 25879cbf80
2 changed files with 82 additions and 82 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
harbour/source/rtl/tmenuitm.prg
View File

@@ -66,7 +66,7 @@ function MenuItem( cCaption, boData, nShortcut, cMsg, nID )
oClass:AddData( "message" , cMsg )
oClass:AddData( "row" , 0 )
oClass:AddData( "shortcut" , nShortcut )
oClass:AddData( "style" , MENU_STYLE )
oClass:AddData( "style" , HB_TMENUITEM_STYLE )
oClass:AddMethod( "isPopup", @isPopup() )

162
harbour/utils/hbtest/rt_misc.prg
View File

@@ -591,99 +591,99 @@ FUNCTION Main_MISC()
TEST_LINE( TESTFNAME( "" ) , ";;;;" )
TEST_LINE( TESTFNAME( " " ) , ";;;;" )
TEST_LINE( TESTFNAME( ": " ) , ":;:;;;" )
TEST_LINE( TESTFNAME( "C:/WORK\HELLO " ) , "C:/WORK\HELLO;C:/WORK\;HELLO;;" )
TEST_LINE( TESTFNAME( "C:\WORK/HELLO " ) , "C:\WORK/HELLO;C:\WORK/;HELLO;;" )
TEST_LINE( TESTFNAME( "C:\WORK\HELLO " ) , "C:\WORK\HELLO;C:\WORK\;HELLO;;" )
TEST_LINE( TESTFNAME( "C:\WORK\HELLO. " ) , "C:\WORK\HELLO.;C:\WORK\;HELLO;.;" )
TEST_LINE( TESTFNAME( "C:\WORK\HELLO.PRG " ) , "C:\WORK\HELLO.PRG;C:\WORK\;HELLO;.PRG;" )
TEST_LINE( TESTFNAME( "C:\WORK\HELLO\ " ) , "C:\WORK\HELLO\;C:\WORK\HELLO\;;;" )
TEST_LINE( TESTFNAME( "C:\WORK\HELLO\.PRG " ) , "C:\WORK\HELLO\.PRG;C:\WORK\HELLO\;.PRG;;" )
TEST_LINE( TESTFNAME( "C:\WORK\HELLO\A.PRG " ) , "C:\WORK\HELLO\A.PRG;C:\WORK\HELLO\;A;.PRG;" )
TEST_LINE( TESTFNAME( "C:\WORK\HELLO\A.B.PRG " ) , "C:\WORK\HELLO\A.B.PRG;C:\WORK\HELLO\;A.B;.PRG;" )
TEST_LINE( TESTFNAME( "C:WORK\HELLO " ) , "C:WORK\HELLO;C:WORK\;HELLO;;" )
TEST_LINE( TESTFNAME( "C:WORK\HELLO. " ) , "C:WORK\HELLO.;C:WORK\;HELLO;.;" )
TEST_LINE( TESTFNAME( "C:WORK\HELLO.PRG " ) , "C:WORK\HELLO.PRG;C:WORK\;HELLO;.PRG;" )
TEST_LINE( TESTFNAME( "C:WORK\HELLO\ " ) , "C:WORK\HELLO\;C:WORK\HELLO\;;;" )
TEST_LINE( TESTFNAME( "C:WORK\HELLO\.PRG " ) , "C:WORK\HELLO\.PRG;C:WORK\HELLO\;.PRG;;" )
TEST_LINE( TESTFNAME( "C:WORK\HELLO\A.PRG " ) , "C:WORK\HELLO\A.PRG;C:WORK\HELLO\;A;.PRG;" )
TEST_LINE( TESTFNAME( "C:WORK\HELLO\A.B.PRG " ) , "C:WORK\HELLO\A.B.PRG;C:WORK\HELLO\;A.B;.PRG;" )
TEST_LINE( TESTFNAME( "C:\WORK.OLD\HELLO " ) , "C:\WORK.OLD\HELLO;C:\WORK.OLD\;HELLO;;" )
TEST_LINE( TESTFNAME( "C:\WORK.OLD\HELLO. " ) , "C:\WORK.OLD\HELLO.;C:\WORK.OLD\;HELLO;.;" )
TEST_LINE( TESTFNAME( "C:\WORK.OLD\HELLO.PRG " ) , "C:\WORK.OLD\HELLO.PRG;C:\WORK.OLD\;HELLO;.PRG;" )
TEST_LINE( TESTFNAME( "C:\WORK.OLD\HELLO\ " ) , "C:\WORK.OLD\HELLO\;C:\WORK.OLD\HELLO\;;;" )
TEST_LINE( TESTFNAME( "C:\WORK.OLD\HELLO\.PRG " ) , "C:\WORK.OLD\HELLO\.PRG;C:\WORK.OLD\HELLO\;.PRG;;" )
TEST_LINE( TESTFNAME( "C:\WORK.OLD\HELLO\A.PRG " ) , "C:\WORK.OLD\HELLO\A.PRG;C:\WORK.OLD\HELLO\;A;.PRG;" )
TEST_LINE( TESTFNAME( "C:\WORK.OLD\HELLO\A.B.PRG " ) , "C:\WORK.OLD\HELLO\A.B.PRG;C:\WORK.OLD\HELLO\;A.B;.PRG;" )
TEST_LINE( TESTFNAME( "C:WORK.OLD\HELLO " ) , "C:WORK.OLD\HELLO;C:WORK.OLD\;HELLO;;" )
TEST_LINE( TESTFNAME( "C:WORK.OLD\HELLO. " ) , "C:WORK.OLD\HELLO.;C:WORK.OLD\;HELLO;.;" )
TEST_LINE( TESTFNAME( "C:WORK.OLD\HELLO.PRG " ) , "C:WORK.OLD\HELLO.PRG;C:WORK.OLD\;HELLO;.PRG;" )
TEST_LINE( TESTFNAME( "C:WORK.OLD\HELLO\ " ) , "C:WORK.OLD\HELLO\;C:WORK.OLD\HELLO\;;;" )
TEST_LINE( TESTFNAME( "C:WORK.OLD\HELLO\.PRG " ) , "C:WORK.OLD\HELLO\.PRG;C:WORK.OLD\HELLO\;.PRG;;" )
TEST_LINE( TESTFNAME( "C:WORK.OLD\HELLO\A.PRG " ) , "C:WORK.OLD\HELLO\A.PRG;C:WORK.OLD\HELLO\;A;.PRG;" )
TEST_LINE( TESTFNAME( "C:WORK.OLD\HELLO\A.B.PRG " ) , "C:WORK.OLD\HELLO\A.B.PRG;C:WORK.OLD\HELLO\;A.B;.PRG;" )
TEST_LINE( TESTFNAME( "C:.OLD\HELLO " ) , "C:.OLD\HELLO;C:.OLD\;HELLO;;" )
TEST_LINE( TESTFNAME( "C:.OLD\HELLO. " ) , "C:.OLD\HELLO.;C:.OLD\;HELLO;.;" )
TEST_LINE( TESTFNAME( "C:.OLD\HELLO.PRG " ) , "C:.OLD\HELLO.PRG;C:.OLD\;HELLO;.PRG;" )
TEST_LINE( TESTFNAME( "C:.OLD\HELLO\ " ) , "C:.OLD\HELLO\;C:.OLD\HELLO\;;;" )
TEST_LINE( TESTFNAME( "C:.OLD\HELLO\.PRG " ) , "C:.OLD\HELLO\.PRG;C:.OLD\HELLO\;.PRG;;" )
TEST_LINE( TESTFNAME( "C:.OLD\HELLO\A.PRG " ) , "C:.OLD\HELLO\A.PRG;C:.OLD\HELLO\;A;.PRG;" )
TEST_LINE( TESTFNAME( "C:.OLD\HELLO\A.B.PRG " ) , "C:.OLD\HELLO\A.B.PRG;C:.OLD\HELLO\;A.B;.PRG;" )
TEST_LINE( TESTFNAME( "\\SERVER\WORK\HELLO " ) , "\\SERVER\WORK\HELLO;\\SERVER\WORK\;HELLO;;" )
TEST_LINE( TESTFNAME( "\\SERVER\WORK\HELLO. " ) , "\\SERVER\WORK\HELLO.;\\SERVER\WORK\;HELLO;.;" )
TEST_LINE( TESTFNAME( "\\SERVER\WORK\HELLO.PRG " ) , "\\SERVER\WORK\HELLO.PRG;\\SERVER\WORK\;HELLO;.PRG;" )
TEST_LINE( TESTFNAME( "\\SERVER\WORK\HELLO\ " ) , "\\SERVER\WORK\HELLO\;\\SERVER\WORK\HELLO\;;;" )
TEST_LINE( TESTFNAME( "\\SERVER\WORK\HELLO\.PRG " ) , "\\SERVER\WORK\HELLO\.PRG;\\SERVER\WORK\HELLO\;.PRG;;" )
TEST_LINE( TESTFNAME( "\\SERVER\WORK\HELLO\A.PRG " ) , "\\SERVER\WORK\HELLO\A.PRG;\\SERVER\WORK\HELLO\;A;.PRG;" )
TEST_LINE( TESTFNAME( "\\SERVER\WORK\HELLO\A.B.PRG" ) , "\\SERVER\WORK\HELLO\A.B.PRG;\\SERVER\WORK\HELLO\;A.B;.PRG;" )
TEST_LINE( TESTFNAME( "\SERVER\WORK\HELLO " ) , "\SERVER\WORK\HELLO;\SERVER\WORK\;HELLO;;" )
TEST_LINE( TESTFNAME( "\SERVER\WORK\HELLO. " ) , "\SERVER\WORK\HELLO.;\SERVER\WORK\;HELLO;.;" )
TEST_LINE( TESTFNAME( "\SERVER\WORK\HELLO.PRG " ) , "\SERVER\WORK\HELLO.PRG;\SERVER\WORK\;HELLO;.PRG;" )
TEST_LINE( TESTFNAME( "\SERVER\WORK\HELLO\ " ) , "\SERVER\WORK\HELLO\;\SERVER\WORK\HELLO\;;;" )
TEST_LINE( TESTFNAME( "\SERVER\WORK\HELLO\.PRG " ) , "\SERVER\WORK\HELLO\.PRG;\SERVER\WORK\HELLO\;.PRG;;" )
TEST_LINE( TESTFNAME( "\SERVER\WORK\HELLO\A.PRG " ) , "\SERVER\WORK\HELLO\A.PRG;\SERVER\WORK\HELLO\;A;.PRG;" )
TEST_LINE( TESTFNAME( "\SERVER\WORK\HELLO\A.B.PRG " ) , "\SERVER\WORK\HELLO\A.B.PRG;\SERVER\WORK\HELLO\;A.B;.PRG;" )
TEST_LINE( TESTFNAME( "C:\HELLO " ) , "C:\HELLO;C:\;HELLO;;" )
TEST_LINE( TESTFNAME( "C:\HELLO. " ) , "C:\HELLO.;C:\;HELLO;.;" )
TEST_LINE( TESTFNAME( "C:\HELLO.PRG " ) , "C:\HELLO.PRG;C:\;HELLO;.PRG;" )
TEST_LINE( TESTFNAME( "C:\HELLO\ " ) , "C:\HELLO\;C:\HELLO\;;;" )
TEST_LINE( TESTFNAME( "C:\HELLO\.PRG " ) , "C:\HELLO\.PRG;C:\HELLO\;.PRG;;" )
TEST_LINE( TESTFNAME( "C:\HELLO\A.PRG " ) , "C:\HELLO\A.PRG;C:\HELLO\;A;.PRG;" )
TEST_LINE( TESTFNAME( "C:\HELLO\A.B.PRG " ) , "C:\HELLO\A.B.PRG;C:\HELLO\;A.B;.PRG;" )
TEST_LINE( TESTFNAME( "C:/WORK/HELLO " ) , "C:/WORK/HELLO;C:/WORK/;HELLO;;" )
TEST_LINE( TESTFNAME( "C:/WORK/HELLO " ) , "C:/WORK/HELLO;C:/WORK/;HELLO;;" )
TEST_LINE( TESTFNAME( "C:/WORK/HELLO " ) , "C:/WORK/HELLO;C:/WORK/;HELLO;;" )
TEST_LINE( TESTFNAME( "C:/WORK/HELLO. " ) , "C:/WORK/HELLO.;C:/WORK/;HELLO;.;" )
TEST_LINE( TESTFNAME( "C:/WORK/HELLO.PRG " ) , "C:/WORK/HELLO.PRG;C:/WORK/;HELLO;.PRG;" )
TEST_LINE( TESTFNAME( "C:/WORK/HELLO/ " ) , "C:/WORK/HELLO/;C:/WORK/HELLO/;;;" )
TEST_LINE( TESTFNAME( "C:/WORK/HELLO/.PRG " ) , "C:/WORK/HELLO/.PRG;C:/WORK/HELLO/;.PRG;;" )
TEST_LINE( TESTFNAME( "C:/WORK/HELLO/A.PRG " ) , "C:/WORK/HELLO/A.PRG;C:/WORK/HELLO/;A;.PRG;" )
TEST_LINE( TESTFNAME( "C:/WORK/HELLO/A.B.PRG " ) , "C:/WORK/HELLO/A.B.PRG;C:/WORK/HELLO/;A.B;.PRG;" )
TEST_LINE( TESTFNAME( "C:WORK/HELLO " ) , "C:WORK/HELLO;C:WORK/;HELLO;;" )
TEST_LINE( TESTFNAME( "C:WORK/HELLO. " ) , "C:WORK/HELLO.;C:WORK/;HELLO;.;" )
TEST_LINE( TESTFNAME( "C:WORK/HELLO.PRG " ) , "C:WORK/HELLO.PRG;C:WORK/;HELLO;.PRG;" )
TEST_LINE( TESTFNAME( "C:WORK/HELLO/ " ) , "C:WORK/HELLO/;C:WORK/HELLO/;;;" )
TEST_LINE( TESTFNAME( "C:WORK/HELLO/.PRG " ) , "C:WORK/HELLO/.PRG;C:WORK/HELLO/;.PRG;;" )
TEST_LINE( TESTFNAME( "C:WORK/HELLO/A.PRG " ) , "C:WORK/HELLO/A.PRG;C:WORK/HELLO/;A;.PRG;" )
TEST_LINE( TESTFNAME( "C:WORK/HELLO/A.B.PRG " ) , "C:WORK/HELLO/A.B.PRG;C:WORK/HELLO/;A.B;.PRG;" )
TEST_LINE( TESTFNAME( "C:/WORK.OLD/HELLO " ) , "C:/WORK.OLD/HELLO;C:/WORK.OLD/;HELLO;;" )
TEST_LINE( TESTFNAME( "C:/WORK.OLD/HELLO. " ) , "C:/WORK.OLD/HELLO.;C:/WORK.OLD/;HELLO;.;" )
TEST_LINE( TESTFNAME( "C:/WORK.OLD/HELLO.PRG " ) , "C:/WORK.OLD/HELLO.PRG;C:/WORK.OLD/;HELLO;.PRG;" )
TEST_LINE( TESTFNAME( "C:/WORK.OLD/HELLO/ " ) , "C:/WORK.OLD/HELLO/;C:/WORK.OLD/HELLO/;;;" )
TEST_LINE( TESTFNAME( "C:/WORK.OLD/HELLO/.PRG " ) , "C:/WORK.OLD/HELLO/.PRG;C:/WORK.OLD/HELLO/;.PRG;;" )
TEST_LINE( TESTFNAME( "C:/WORK.OLD/HELLO/A.PRG " ) , "C:/WORK.OLD/HELLO/A.PRG;C:/WORK.OLD/HELLO/;A;.PRG;" )
TEST_LINE( TESTFNAME( "C:/WORK.OLD/HELLO/A.B.PRG " ) , "C:/WORK.OLD/HELLO/A.B.PRG;C:/WORK.OLD/HELLO/;A.B;.PRG;" )
TEST_LINE( TESTFNAME( "C:WORK.OLD/HELLO " ) , "C:WORK.OLD/HELLO;C:WORK.OLD/;HELLO;;" )
TEST_LINE( TESTFNAME( "C:WORK.OLD/HELLO. " ) , "C:WORK.OLD/HELLO.;C:WORK.OLD/;HELLO;.;" )
TEST_LINE( TESTFNAME( "C:WORK.OLD/HELLO.PRG " ) , "C:WORK.OLD/HELLO.PRG;C:WORK.OLD/;HELLO;.PRG;" )
TEST_LINE( TESTFNAME( "C:WORK.OLD/HELLO/ " ) , "C:WORK.OLD/HELLO/;C:WORK.OLD/HELLO/;;;" )
TEST_LINE( TESTFNAME( "C:WORK.OLD/HELLO/.PRG " ) , "C:WORK.OLD/HELLO/.PRG;C:WORK.OLD/HELLO/;.PRG;;" )
TEST_LINE( TESTFNAME( "C:WORK.OLD/HELLO/A.PRG " ) , "C:WORK.OLD/HELLO/A.PRG;C:WORK.OLD/HELLO/;A;.PRG;" )
TEST_LINE( TESTFNAME( "C:WORK.OLD/HELLO/A.B.PRG " ) , "C:WORK.OLD/HELLO/A.B.PRG;C:WORK.OLD/HELLO/;A.B;.PRG;" )
TEST_LINE( TESTFNAME( "C:.OLD/HELLO " ) , "C:.OLD/HELLO;C:.OLD/;HELLO;;" )
TEST_LINE( TESTFNAME( "C:.OLD/HELLO. " ) , "C:.OLD/HELLO.;C:.OLD/;HELLO;.;" )
TEST_LINE( TESTFNAME( "C:.OLD/HELLO.PRG " ) , "C:.OLD/HELLO.PRG;C:.OLD/;HELLO;.PRG;" )
TEST_LINE( TESTFNAME( "C:.OLD/HELLO/ " ) , "C:.OLD/HELLO/;C:.OLD/HELLO/;;;" )
TEST_LINE( TESTFNAME( "C:.OLD/HELLO/.PRG " ) , "C:.OLD/HELLO/.PRG;C:.OLD/HELLO/;.PRG;;" )
TEST_LINE( TESTFNAME( "C:.OLD/HELLO/A.PRG " ) , "C:.OLD/HELLO/A.PRG;C:.OLD/HELLO/;A;.PRG;" )
TEST_LINE( TESTFNAME( "C:.OLD/HELLO/A.B.PRG " ) , "C:.OLD/HELLO/A.B.PRG;C:.OLD/HELLO/;A.B;.PRG;" )
TEST_LINE( TESTFNAME( "//SERVER/WORK/HELLO " ) , "//SERVER/WORK/HELLO;//SERVER/WORK/;HELLO;;" )
TEST_LINE( TESTFNAME( "//SERVER/WORK/HELLO. " ) , "//SERVER/WORK/HELLO.;//SERVER/WORK/;HELLO;.;" )
TEST_LINE( TESTFNAME( "//SERVER/WORK/HELLO.PRG " ) , "//SERVER/WORK/HELLO.PRG;//SERVER/WORK/;HELLO;.PRG;" )
TEST_LINE( TESTFNAME( "//SERVER/WORK/HELLO/ " ) , "//SERVER/WORK/HELLO/;//SERVER/WORK/HELLO/;;;" )
TEST_LINE( TESTFNAME( "//SERVER/WORK/HELLO/.PRG " ) , "//SERVER/WORK/HELLO/.PRG;//SERVER/WORK/HELLO/;.PRG;;" )
TEST_LINE( TESTFNAME( "//SERVER/WORK/HELLO/A.PRG " ) , "//SERVER/WORK/HELLO/A.PRG;//SERVER/WORK/HELLO/;A;.PRG;" )
TEST_LINE( TESTFNAME( "//SERVER/WORK/HELLO/A.B.PRG" ) , "//SERVER/WORK/HELLO/A.B.PRG;//SERVER/WORK/HELLO/;A.B;.PRG;" )
TEST_LINE( TESTFNAME( "/SERVER/WORK/HELLO " ) , "/SERVER/WORK/HELLO;/SERVER/WORK/;HELLO;;" )
TEST_LINE( TESTFNAME( "/SERVER/WORK/HELLO. " ) , "/SERVER/WORK/HELLO.;/SERVER/WORK/;HELLO;.;" )
TEST_LINE( TESTFNAME( "/SERVER/WORK/HELLO.PRG " ) , "/SERVER/WORK/HELLO.PRG;/SERVER/WORK/;HELLO;.PRG;" )
TEST_LINE( TESTFNAME( "/SERVER/WORK/HELLO/ " ) , "/SERVER/WORK/HELLO/;/SERVER/WORK/HELLO/;;;" )
TEST_LINE( TESTFNAME( "/SERVER/WORK/HELLO/.PRG " ) , "/SERVER/WORK/HELLO/.PRG;/SERVER/WORK/HELLO/;.PRG;;" )
TEST_LINE( TESTFNAME( "/SERVER/WORK/HELLO/A.PRG " ) , "/SERVER/WORK/HELLO/A.PRG;/SERVER/WORK/HELLO/;A;.PRG;" )
TEST_LINE( TESTFNAME( "/SERVER/WORK/HELLO/A.B.PRG " ) , "/SERVER/WORK/HELLO/A.B.PRG;/SERVER/WORK/HELLO/;A.B;.PRG;" )
TEST_LINE( TESTFNAME( "C:/HELLO " ) , "C:/HELLO;C:/;HELLO;;" )
TEST_LINE( TESTFNAME( "C:/HELLO. " ) , "C:/HELLO.;C:/;HELLO;.;" )
TEST_LINE( TESTFNAME( "C:/HELLO.PRG " ) , "C:/HELLO.PRG;C:/;HELLO;.PRG;" )
TEST_LINE( TESTFNAME( "C:/HELLO/ " ) , "C:/HELLO/;C:/HELLO/;;;" )
TEST_LINE( TESTFNAME( "C:/HELLO/.PRG " ) , "C:/HELLO/.PRG;C:/HELLO/;.PRG;;" )
TEST_LINE( TESTFNAME( "C:/HELLO/A.PRG " ) , "C:/HELLO/A.PRG;C:/HELLO/;A;.PRG;" )
TEST_LINE( TESTFNAME( "C:/HELLO/A.B.PRG " ) , "C:/HELLO/A.B.PRG;C:/HELLO/;A.B;.PRG;" )
TEST_LINE( TESTFNAME( "C:HELLO " ) , "C:HELLO;C:;HELLO;;" )
TEST_LINE( TESTFNAME( "C:HELLO. " ) , "C:HELLO.;C:;HELLO;.;" )
TEST_LINE( TESTFNAME( "C:HELLO.PRG " ) , "C:HELLO.PRG;C:;HELLO;.PRG;" )
TEST_LINE( TESTFNAME( "C:HELLO\ " ) , "C:HELLO\;C:HELLO\;;;" )
TEST_LINE( TESTFNAME( "C:HELLO\.PRG " ) , "C:HELLO\.PRG;C:HELLO\;.PRG;;" )
TEST_LINE( TESTFNAME( "C:HELLO\A.PRG " ) , "C:HELLO\A.PRG;C:HELLO\;A;.PRG;" )
TEST_LINE( TESTFNAME( "C:HELLO\A.B.PRG " ) , "C:HELLO\A.B.PRG;C:HELLO\;A.B;.PRG;" )
TEST_LINE( TESTFNAME( "\\HELLO " ) , "\\HELLO;\\;HELLO;;" )
TEST_LINE( TESTFNAME( "\\HELLO. " ) , "\\HELLO.;\\;HELLO;.;" )
TEST_LINE( TESTFNAME( "\\HELLO.PRG " ) , "\\HELLO.PRG;\\;HELLO;.PRG;" )
TEST_LINE( TESTFNAME( "\\HELLO\ " ) , "\\HELLO\;\\HELLO\;;;" )
TEST_LINE( TESTFNAME( "\\.PRG " ) , "\\.PRG;\\;.PRG;;" )
TEST_LINE( TESTFNAME( "\\A.PRG " ) , "\\A.PRG;\\;A;.PRG;" )
TEST_LINE( TESTFNAME( "\\A.B.PRG " ) , "\\A.B.PRG;\\;A.B;.PRG;" )
TEST_LINE( TESTFNAME( "\HELLO " ) , "\HELLO;\;HELLO;;" )
TEST_LINE( TESTFNAME( "\HELLO. " ) , "\HELLO.;\;HELLO;.;" )
TEST_LINE( TESTFNAME( "\HELLO.PRG " ) , "\HELLO.PRG;\;HELLO;.PRG;" )
TEST_LINE( TESTFNAME( "\HELLO\ " ) , "\HELLO\;\HELLO\;;;" )
TEST_LINE( TESTFNAME( "\HELLO\.PRG " ) , "\HELLO\.PRG;\HELLO\;.PRG;;" )
TEST_LINE( TESTFNAME( "\HELLO\A.PRG " ) , "\HELLO\A.PRG;\HELLO\;A;.PRG;" )
TEST_LINE( TESTFNAME( "\HELLO\A.B.PRG " ) , "\HELLO\A.B.PRG;\HELLO\;A.B;.PRG;" )
TEST_LINE( TESTFNAME( "C:HELLO/ " ) , "C:HELLO/;C:HELLO/;;;" )
TEST_LINE( TESTFNAME( "C:HELLO/.PRG " ) , "C:HELLO/.PRG;C:HELLO/;.PRG;;" )
TEST_LINE( TESTFNAME( "C:HELLO/A.PRG " ) , "C:HELLO/A.PRG;C:HELLO/;A;.PRG;" )
TEST_LINE( TESTFNAME( "C:HELLO/A.B.PRG " ) , "C:HELLO/A.B.PRG;C:HELLO/;A.B;.PRG;" )
TEST_LINE( TESTFNAME( "//HELLO " ) , "//HELLO;//;HELLO;;" )
TEST_LINE( TESTFNAME( "//HELLO. " ) , "//HELLO.;//;HELLO;.;" )
TEST_LINE( TESTFNAME( "//HELLO.PRG " ) , "//HELLO.PRG;//;HELLO;.PRG;" )
TEST_LINE( TESTFNAME( "//HELLO/ " ) , "//HELLO/;//HELLO/;;;" )
TEST_LINE( TESTFNAME( "//.PRG " ) , "//.PRG;//;.PRG;;" )
TEST_LINE( TESTFNAME( "//A.PRG " ) , "//A.PRG;//;A;.PRG;" )
TEST_LINE( TESTFNAME( "//A.B.PRG " ) , "//A.B.PRG;//;A.B;.PRG;" )
TEST_LINE( TESTFNAME( "/HELLO " ) , "/HELLO;/;HELLO;;" )
TEST_LINE( TESTFNAME( "/HELLO. " ) , "/HELLO.;/;HELLO;.;" )
TEST_LINE( TESTFNAME( "/HELLO.PRG " ) , "/HELLO.PRG;/;HELLO;.PRG;" )
TEST_LINE( TESTFNAME( "/HELLO/ " ) , "/HELLO/;/HELLO/;;;" )
TEST_LINE( TESTFNAME( "/HELLO/.PRG " ) , "/HELLO/.PRG;/HELLO/;.PRG;;" )
TEST_LINE( TESTFNAME( "/HELLO/A.PRG " ) , "/HELLO/A.PRG;/HELLO/;A;.PRG;" )
TEST_LINE( TESTFNAME( "/HELLO/A.B.PRG " ) , "/HELLO/A.B.PRG;/HELLO/;A.B;.PRG;" )
TEST_LINE( TESTFNAME( "HELLO " ) , "HELLO;;HELLO;;" )
TEST_LINE( TESTFNAME( "HELLO. " ) , "HELLO.;;HELLO;.;" )
TEST_LINE( TESTFNAME( "HELLO.PRG " ) , "HELLO.PRG;;HELLO;.PRG;" )
TEST_LINE( TESTFNAME( "HELLO\ " ) , "HELLO\;HELLO\;;;" )
TEST_LINE( TESTFNAME( "HELLO/ " ) , "HELLO/;HELLO/;;;" )
TEST_LINE( TESTFNAME( ".PRG " ) , ".PRG;;.PRG;;" )
TEST_LINE( TESTFNAME( "A.PRG " ) , "A.PRG;;A;.PRG;" )
TEST_LINE( TESTFNAME( "A.B.PRG " ) , "A.B.PRG;;A.B;.PRG;" )
TEST_LINE( TESTFNAME( " " ) , ";;;;" )
TEST_LINE( TESTFNAME( "\ " ) , "\;\;;;" )
TEST_LINE( TESTFNAME( "\\ " ) , "\\;\\;;;" )
TEST_LINE( TESTFNAME( "/ " ) , "/;/;;;" )
TEST_LINE( TESTFNAME( "// " ) , "//;//;;;" )
TEST_LINE( TESTFNAME( "C " ) , "C;;C;;" )
TEST_LINE( TESTFNAME( "C: " ) , "C:;C:;;;" )
TEST_LINE( TESTFNAME( "C:\ " ) , "C:\;C:\;;;" )
TEST_LINE( TESTFNAME( "C:\\ " ) , "C:\\;C:\\;;;" )
TEST_LINE( TESTFNAME( "C:/ " ) , "C:/;C:/;;;" )
TEST_LINE( TESTFNAME( "C:// " ) , "C://;C://;;;" )
#endif