I declare array of arrays [525][480]
=========================
#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"

#include "ppport.h"

MODULE = HalfWork            PACKAGE = HalfWork

int
sum_numbers(int x)
       CODE:
       {
       double ma[545][480];
        int i, sum;

        for(i=1,sum=0;i<=x;i++)
          {
           sum+=i;
          }
        RETVAL=sum;
       }
       OUTPUT:
       RETVAL
=========================
and next i run script
=========================
#/usr/bin/perl -w

BEGIN
 {
     push @INC, "./blib/arch", "./blib/lib";
       }

       use HalfWork;

       $x=HalfWork::sum_numbers(5);

       print "$x\n";
[EMAIL PROTECTED] HalfWork]$ perl rr.pl
Segmentation fault
[EMAIL PROTECTED] HalfWork]$
=========================
If array off arrays have dimension is
[524][480]

i have not Segmentation fault...

How i can declare and use arrary of arrays with dimensions of [640][480]

Thanks!

Dima



Reply via email to