ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Alexey Froloff                       2:5020/1437.4  16 Oct 2000  21:09:33
 To : Fedor Lizunkov
 Subject : perl, C
 -------------------------------------------------------------------------------- 
 

 
     ПисАл как-то ты для All на темy "perl, C", и я не мог пpойти мимо...
 
  FL> sub test {
  FL> @array = ("тут строка", "тут еще строка, именно с пробелами", "ну и
  FL> т.д.");
  FL> $parray = \@array;
  FL> Cfunc($parray); }
 
  FL> static XS(perl_Cfunc)
  FL> {
  FL>    XSARGS;
  FL>    STRLEN len;
 
         AV* av;
 
  FL>    ...
 
         av = (AV*) SvRV(ST(0));
 
     Хотя по хорошему надо сначала ST(0) проверить на SvROK и ScTYPE(SvRV(ST(0)))
 на SVt_PVAV...
 
  FL> работать с ним, типа получить размер массива и доступ к его содержимому
  FL> ...
 
     perldoc perlguts
 
                               Regards, Sir Raorn.
 
 ... Стыдно за вчерашнее, но не помню перед кем...
 --- GoldED+/LNX 1.1.4.6-sr Registered Linux User #177282
  * Origin: RAM wasn't built in a day. (2:5020/1437.4)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    perl, C   Fedor Lizunkov   14 Oct 2000 23:23:36   Re: perl, C   Andy Fedotov   15 Oct 2000 19:41:48   perl, C   Fedor Lizunkov   16 Oct 2000 08:52:46   perl, C   Alexey Froloff   19 Oct 2000 01:21:02   perl, C   Fedor Lizunkov   19 Oct 2000 20:03:36   perl, C   Alexey Froloff   16 Oct 2000 21:09:33