Re: f2cl trouble with common block -- function make-<block name> undefined

>>>>> "Robert" == Robert Dodier <[email protected]> writes:

Hello, Robert!

    Robert> g77 compiles this program and when executed it yields BAR IS 12345.
    Robert> I translate this with (f2cl::f2cl "tmp.f" :declare-common t)
    Robert> (same problem with (f2cl::f2cl "tmp.f" :declare-common t :common-as-array t)
    Robert> by the way). The translation is apparently successful.
    Robert> However, (load "tmp.lisp") complains "undefined function
    Robert> FORTRAN-TO-LISP::MAKE-MYCOMN".

Does the result work?  I also get these warnings when I compile the
lisp code with cmucl.  But the resulting compiled code does work.

    Robert> I looked at f2cl5.lisp and it looks like the stuff in create-sym-macros-array
    Robert> is relevant in the :common-as-array case. However it appears that the
    Robert> make-array at line 774 is never executed. I couldn't figure out anything else.

The generated code looks the same as that generated by cmucl.

Ray



-------------------------------------------------------
This SF.net email is sponsored by: Splunk Inc. Do you grep through log files
for problems?  Stop!  Download the new AJAX search engine that makes
searching your log files as easy as surfing the  web.  DOWNLOAD SPLUNK!
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=103432&bid=230486&dat=121642