Enrico Maria Giordano wrote:
>
> What is the correct way to implement the following sample in Harbour (it
> works fine in Clipper and xHarbour):
>
> FUNCTION MAIN()
>
> LOCAL aArray := { "Test 1" }
>
> ? TEST( aArray )
>
> RETURN NIL
>
>
> #pragma BEGINDUMP
>
> #include "hbapi.h"
>
>
> HB_FUNC( TEST )
> {
> hb_retc( hb_parc( 1, 1 ) );
> }
>
> #pragma ENDDUMP
>
>
> EMG
>
>
HB_FUNC( TEST )
{
hb_retc( hb_parvc( 1, 1 ) );
}
Regards,
Petr
--
View this message in context:
http://www.nabble.com/Array-access-at-C-level-tp24777980p24778819.html
Sent from the Harbour - Dev mailing list archive at Nabble.com.
_______________________________________________
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour
