[GRASS-user] m.eigensystem segfaults under Jaunty (beta)

Hamish:
> perhaps you could compile into the fortran code some informative
> hints, e.g. put scatter some of these before and after reading
> the input values, etc:
>
> ----8<----
> PRINT *,"Made it past normalizing the data"
> ----8<----

Nikos:

So I did. Randomely I've introduced in main.f some PRINT lines (I
changed the text -- details below).

I get an error when I try to compile:

# attempt to compile after changes
make MODULE_TOPDIR=/geo/osgeo/src/grass6_devel

....

f77 -c -o main.o main.f
   MAIN eigen:
Error on line 43: Declaration error declaration among
executables

[...]

/usr/bin/f77: aborting compilation
make: *** [main.o] Error 25

.... start by dealing with the first error on line 43 ...

svn diff
Index: main.f

--- main.f (revision 36664)
+++ main.f (working copy)
@@ -39,6 +39,7 @@

^^^ diff starts on line 39

C of the eigen value
(E).

C
+ PRINT *,"Starting the program..."

^^^ so this is line 43.

        DOUBLE PRECISION
A(30,30),W1,W2,WR(30),WI(30),Z(30,30),FV1(30)
        DOUBLE PRECISION SUM1,SUM2
        INTEGER
    IV1(30),N

I think you have to wait until after you define your variables before
you can run any commands like print. Try 'C'ommenting our that first
"Stating the program" one.

I am not sure, but I don't think you have to wait until the write device
(stdout) has been opened before using PRINT.

Hamish

Just FYI,

m.eigensystem compiles and works just fine under Ubuntu Jaunty - 64-bit.
Maybe it was some mistake of mine (or some of the few updates last
week(s)) fixed the problem (!?).

Regards, Nikos