Przemek:
>We should make some tests. Also in OS/2 for GCC and OpenWatcom builds.
>This code can be used for tests:
> proc main()
> ? "0:", HB_FISDEVICE( 0 )
> ? "1:", HB_FISDEVICE( 1 )
> ? "2:", HB_FISDEVICE( 2 )
> return
> #pragma begindump
> #include "hbapifs.h"
> HB_FUNC( HB_FISDEVICE )
> {
> hb_retl( hb_fsIsDevice( hb_numToHandle( hb_parnint( 1 ) ) ) );
> }
> #pragma enddump
[E:\harbour911b\harbour\bin\os2\watcom]pba2.exe
0: .T.
1: .T.
2: .T.
[E:\harbour911b\harbour\bin\os2\watcom]pba2.exe > pba2.txt
0: .T.
1: .F.
2: .T.
[E:\harbour911b\harbour\bin\os2\watcom]pba2.exe 2> pba2.txt
0: .T.
1: .T.
2: .F.
>In DJGPP builds with COMMAND.COM and BASH also works as expected
>so only OS/2 builds should be verified yet.
Below are results using OpenWatcom, current and older Harbour
Why empty lines between ?
-------
100
200
300
[...]
-------
David Macias
hbmk2 speedtst.prg
==================
hbmk2: Processing environment options: -compiler=watcom
Harbour 2.0.0beta3 (Rev. 13082)
Copyright (c) 1999-2009, http://www.harbour-project.org/
Compiling 'speedtst.prg'...
Lines 1204, Functions/Procedures 79
Generating C source output to 'speedtst.c'... Done.
hbmk2 speedtst.prg > sale.txt 2>&1
==================
hbmk2: Processing environment options: -compiler=watcom
Harbour 2.0.0beta3 (Rev. 13082)
Copyright (c) 1999-2009, http://www.harbour-project.org/
Compiling 'speedtst.prg'...
100
200
300
400
500
600
700
800
900
1000
Lines 1204, Functions/Procedures 79
Generating C source output to 'speedtst.c'... Done.
hbmk2 speedtst.prg
==================
hbmk2: Processing environment options: -compiler=watcom
Harbour 2.0.0beta3 (Rev. 12894)
Copyright (c) 1999-2009,
http://www.harbour-proje
ct.org/
Compiling 'speedtst.prg'...
Lines 1204, Functions/Procedures 79
Generating C source output to
'speedtst.c'...
Done.
hbmk2 speedtst.prg > sale.txt 2>&1
==================
hbmk2: Processing environment options: -compiler=watcom
Harbour 2.0.0beta3 (Rev. 12894)
Copyright (c) 1999-2009, http://www.harbour-project.org/
Compiling 'speedtst.prg'...
100
200
300
400
500
600
700
800
900
1000
Lines 1204, Functions/Procedures 79
Generating C source output to 'speedtst.c'... Done.
_______________________________________________
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour
