Hi Joe,

The problem is deeper as I began to suspect.   Here is write_char:

subroutine write_char(c, iunit)
  character c
  integer iunit
! if (len(c).eq.1) write(iunit,1000) c
1000 format(a,$)
end subroutine write_char

  call sfftw_export_wisdom(write_char, iunit)

which does no writing.   But the Fortran error is still there:   Actual string 
length is shorter than the declared one for dummy argument 'c' (0/1).  

 It seems that in my case, sfftw_export_wisdom is producing a corrupted 
character, or strictly, a corrupted pointer as argument to write_char

I looked at fftw.org site and notice that a bug had been found in 
wisdom-to-conf (v3.3.3) and suspected that there might be other problems in 
this area so upgraded to 3.3.4.

This time the error is the same but with a new problem for 'c':   
(-1202660032/1)     

I will work on this problem and let you know how/when I have solved it.

--- John G4KLA
------------------------------------------------------------------------------
Download BIRT iHub F-Type - The Free Enterprise-Grade BIRT Server
from Actuate! Instantly Supercharge Your Business Reports and Dashboards
with Interactivity, Sharing, Native Excel Exports, App Integration & more
Get technology previously reserved for billion-dollar corporations, FREE
http://pubads.g.doubleclick.net/gampad/clk?id=157005751&iu=/4140/ostg.clktrk
_______________________________________________
wsjt-devel mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/wsjt-devel

Reply via email to