Re: F2CL under LWW a few warnings

Hi

I think I fixed all of them, except the NTHCHAR, and the 
UNIQUE-ELEMENTS one (and I am not sure about the MAKE-LABEL one).


Cheers

marco



On Jul 21, 2004, at 5:19 PM, Marco Antoniotti wrote:

> Hi
>
> I am trying to compile (and use) F2CL under LWW.  I get a few warnings 
> that I'd like to double check.  Note that there are a few undefined 
> functions. Could you have a look at them?
>
> Thanks
>
> Marco
>
>
> ==================
>
> CL-USER 26 > (mk:compile-system "f2cl")
> ; Loading text file z:\lang\cl\clocc\f2cl\f2cl.system
> ;;; Compiling file z:\lang\cl\clocc\f2cl\src\f2cl0.l ...
> ;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
> ;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3, GC safety = 3
> ;;; Source level debugging is on
> ;;; Source file recording is  on
> ;;; Cross referencing is on
> ; (TOP-LEVEL-FORM 1)
> ; (TOP-LEVEL-FORM 2)
> ; (DEFPACKAGE "F2CL-LIB")
> ; (DEFPACKAGE "FORTRAN-TO-LISP")
> ; (TOP-LEVEL-FORM 3)
> ; Loading fasl file z:\lang\cl\clocc\f2cl\src\f2cl0.fsl
> ;;; Compiling file z:\lang\cl\clocc\f2cl\src\f2cl1.l ...
> ;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
> ;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3, GC safety = 3
> ;;; Source level debugging is on
> ;;; Source file recording is  on
> ;;; Cross referencing is on
> ; (TOP-LEVEL-FORM 1)
> ; (TOP-LEVEL-FORM 2)
> ; (DEFVAR FORTRAN-TO-LISP::*VERBOSE*)
> ; (DEFVAR FORTRAN-TO-LISP::*COMMENTS*)
> ; (DEFPARAMETER FORTRAN-TO-LISP::*F2CL-VERSION*)
> ; (DEFVAR FORTRAN-TO-LISP::*INTRINSIC-FUNCTION-NAMES*)
> ; (DEFTYPE FORTRAN-TO-LISP::LOGICAL)
> ; (DEFTYPE FORTRAN-TO-LISP::INTEGER4)
> ; (DEFTYPE FORTRAN-TO-LISP::INTEGER2)
> ; (DEFTYPE FORTRAN-TO-LISP::INTEGER1)
> ; (DEFTYPE FORTRAN-TO-LISP::REAL8)
> ; (DEFTYPE FORTRAN-TO-LISP::REAL4)
> ; (DEFTYPE FORTRAN-TO-LISP::COMPLEX8)
> ; (DEFTYPE FORTRAN-TO-LISP::COMPLEX16)
> ; (DEFTYPE FORTRAN-TO-LISP::ARRAY-DOUBLE-FLOAT)
> ; (DEFTYPE FORTRAN-TO-LISP::ARRAY-INTEGER4)
> ; (DEFTYPE FORTRAN-TO-LISP::ARRAY-SINGLE-FLOAT)
> ; (DEFTYPE FORTRAN-TO-LISP::ARRAY-STRINGS)
> ; (TOP-LEVEL-FORM 3)
> ; (TOP-LEVEL-FORM 4)
> ; (DEFVAR FORTRAN-TO-LISP::*COMMON-BLOCKS*)
> ; (DEFVAR FORTRAN-TO-LISP::*COMMON-BLOCK-INITIALIZED*)
> ; (DEFVAR FORTRAN-TO-LISP::*RELAXED-ARRAY-DECLS*)
> ; (DEFVAR FORTRAN-TO-LISP::*COERCE-ASSIGNMENTS*)
> ; (DEFVAR FORTRAN-TO-LISP::*DEFAULT-LISP-EXTENSION*)
> ; (DEFVAR FORTRAN-TO-LISP::*FORTRAN-EXTENSIONS*)
> ; (DEFVAR FORTRAN-TO-LISP::*DECLARE-COMMON-BLOCKS*)
> ; (DEFVAR FORTRAN-TO-LISP::*ASSIGNED-VARIABLES*)
> ; (DEFVAR FORTRAN-TO-LISP::*ENTRY-POINTS*)
> ; (DEFVAR FORTRAN-TO-LISP::*F2CL-TRACE*)
> ; (DEFVAR FORTRAN-TO-LISP::*FLOAT-FORMAT*)
> ; (DEFVAR FORTRAN-TO-LISP::*USE-FUNCTION-INFO*)
> ; (SUBFUNCTION (DEFSETF FORTRAN-TO-LISP::F2CL-FINFO-CALLS) (DEFSTRUCT 
> FORTRAN-TO-LISP::F2CL-FINFO))
> ; (SUBFUNCTION (DEFSETF FORTRAN-TO-LISP::F2CL-FINFO-CALLS) (DEFSTRUCT 
> FORTRAN-TO-LISP::F2CL-FINFO))
> ; (SUBFUNCTION (DEFSETF FORTRAN-TO-LISP::F2CL-FINFO-CALLS) (DEFSTRUCT 
> FORTRAN-TO-LISP::F2CL-FINFO))
> ; (SUBFUNCTION (DEFSETF FORTRAN-TO-LISP::F2CL-FINFO-RETURN-VALUES) 
> (DEFSTRUCT FORTRAN-TO-LISP::F2CL-FINFO))
> ; (SUBFUNCTION (DEFSETF FORTRAN-TO-LISP::F2CL-FINFO-RETURN-VALUES) 
> (DEFSTRUCT FORTRAN-TO-LISP::F2CL-FINFO))
> ; (SUBFUNCTION (DEFSETF FORTRAN-TO-LISP::F2CL-FINFO-RETURN-VALUES) 
> (DEFSTRUCT FORTRAN-TO-LISP::F2CL-FINFO))
> ; (SUBFUNCTION (DEFSETF FORTRAN-TO-LISP::F2CL-FINFO-ARG-TYPES) 
> (DEFSTRUCT FORTRAN-TO-LISP::F2CL-FINFO))
> ; (SUBFUNCTION (DEFSETF FORTRAN-TO-LISP::F2CL-FINFO-ARG-TYPES) 
> (DEFSTRUCT FORTRAN-TO-LISP::F2CL-FINFO))
> ; (SUBFUNCTION (DEFSETF FORTRAN-TO-LISP::F2CL-FINFO-ARG-TYPES) 
> (DEFSTRUCT FORTRAN-TO-LISP::F2CL-FINFO))
> ; (SUBFUNCTION FORTRAN-TO-LISP::MAKE-F2CL-FINFO (DEFSTRUCT 
> FORTRAN-TO-LISP::F2CL-FINFO))
> ; (SUBFUNCTION FORTRAN-TO-LISP::MAKE-F2CL-FINFO (DEFSTRUCT 
> FORTRAN-TO-LISP::F2CL-FINFO))
> ; (DEFVAR FORTRAN-TO-LISP::*F2CL-FUNCTION-INFO*)
> ; (DEFVAR FORTRAN-TO-LISP::*F2CL-STATEMENT-FINFO*)
> ; FORTRAN-TO-LISP::CLEAR-F2CL-FINFO
> ; FORTRAN-TO-LISP:F2CL
> ;;;*** Warning in FORTRAN-TO-LISP:F2CL-COMPILE: ERROR-FILE is bound 
> but not referenced
> ; FORTRAN-TO-LISP:F2CL-COMPILE
> ; FORTRAN-TO-LISP::PROCESS-DATA
> ; FORTRAN-TO-LISP::CONCATEN
> ; FORTRAN-TO-LISP::FORTRAN-TO-LISP
> ; FORTRAN-TO-LISP::SINGLE-MACRO-CHARACTER
> ; (DEFVAR FORTRAN-TO-LISP::*FORTRAN-READTABLE*)
> ; FORTRAN-TO-LISP::WITH-FORTRAN-SYNTAX
> ; FORTRAN-TO-LISP::ID-EXTENDED-DO
> ; FORTRAN-TO-LISP::REWRITE-EXTENDED-DO
> ; FORTRAN-TO-LISP::ID-END-DO
> ; FORTRAN-TO-LISP::ID-WRITE-FORMAT
> ; FORTRAN-TO-LISP::READSUBPROG-EXTRACT-FORMAT-STMTS
> ; FORTRAN-TO-LISP::INTRODUCE-CONTINUE
> ; FORTRAN-TO-LISP::FIND-DO
> ; FORTRAN-TO-LISP::FIXUP-F2CL-LIB
> ; FORTRAN-TO-LISP::MAYBE-NULLIFY-RETURNS
> ; FORTRAN-TO-LISP::TRANSLATE-AND-WRITE-SUBPROG
> ; FORTRAN-TO-LISP::SPECIAL-PRINT
> ; FORTRAN-TO-LISP::PRINC-RESET
> ; FORTRAN-TO-LISP::TRANSLATE-LABEL
> ; FORTRAN-TO-LISP::TRANSLATE-LINE
> ; FORTRAN-TO-LISP::ID-DEFINITION-PROG-NAME
> ; FORTRAN-TO-LISP::ID-DEFINITION-PROG
> ; FORTRAN-TO-LISP::ID-DEFINITION-SUB
> ; FORTRAN-TO-LISP::ID-DEFINITION-FUN-TYPED
> ; FORTRAN-TO-LISP::ID-DEFINITION-FUN
> ; FORTRAN-TO-LISP::ID-DEFINITION-ENTRY
> ; FORTRAN-TO-LISP::ID-CONTINUE
> ; FORTRAN-TO-LISP::ID-GOTO
> ; FORTRAN-TO-LISP::ID-COMP-GOTO-CORE
> ; FORTRAN-TO-LISP::ID-COMP-GOTO
> ; FORTRAN-TO-LISP::ID-COMP-GO-TO
> ; FORTRAN-TO-LISP::ID-GO-TO
> ; FORTRAN-TO-LISP::ID-ASSGN-GO-TO-CORE
> ; FORTRAN-TO-LISP::ID-ASSGN-GO-TO
> ; FORTRAN-TO-LISP::ID-ASSGN-GOTO
> ; FORTRAN-TO-LISP::ID-DECLARATION
> ; FORTRAN-TO-LISP::ID-IF-THEN
> ; FORTRAN-TO-LISP::ID-IF-GOTO
> ; FORTRAN-TO-LISP::ID-IF
> ; FORTRAN-TO-LISP::ID-ELSE
> ; FORTRAN-TO-LISP::ID-ELSE-IF
> ; FORTRAN-TO-LISP::ID-ELSEIF
> ; FORTRAN-TO-LISP::ID-ENDIF
> ; FORTRAN-TO-LISP::ID-ASSIGNMENT
> ; FORTRAN-TO-LISP::ID-SUBROUTINE-CALL
> ; FORTRAN-TO-LISP::ID-DO-LOOP
> ; FORTRAN-TO-LISP::ID-PAUSE
> ; FORTRAN-TO-LISP::ID-RETURN
> ; FORTRAN-TO-LISP::ID-PREDICATE
> ; FORTRAN-TO-LISP::ID-IMPLICIT-DECL
> ; FORTRAN-TO-LISP::ID-PARAMETER
> ; FORTRAN-TO-LISP::PARSE-PROG-DEFINITION
> ; FORTRAN-TO-LISP::PARSE-SUBR-DEFINITION
> ; FORTRAN-TO-LISP::PARSE-TYPED-FUN-DEFINITION
> ; FORTRAN-TO-LISP::PARSE-FUN-DEFINITION
> ; FORTRAN-TO-LISP::PARSE-ENTRY-DEFINITION
> ; FORTRAN-TO-LISP::PARSE-GOTO
> ; FORTRAN-TO-LISP::MAKE-LABEL
> ; FORTRAN-TO-LISP::LISTN
> ; FORTRAN-TO-LISP::PARSE-COMP-GOTO
> ; FORTRAN-TO-LISP::PARSE-COMP-GO-TO
> ; FORTRAN-TO-LISP::PARSE-ASSGN-GO-TO
> ; FORTRAN-TO-LISP::PARSE-ASSGN-GOTO
> ; FORTRAN-TO-LISP::PARSE-DECLARATION
> ; FORTRAN-TO-LISP::PARSE-IMPLICIT-DECL
> ; FORTRAN-TO-LISP::BUILD_DECL_LIST
> ; FORTRAN-TO-LISP::PARSE_DIMENSION_SPECS
> ; FORTRAN-TO-LISP::PARSE_UPPER_AND_LOWER_BOUNDS
> ; FORTRAN-TO-LISP::PARSE-ASSIGNMENT
> ; FORTRAN-TO-LISP::PARSE-ARRAYREF-OR-STMTFN
> ; FORTRAN-TO-LISP::PARSE-EXPRESSION
> ; FORTRAN-TO-LISP::PARSE-PAUSE
> ; FORTRAN-TO-LISP::FIND-DUPLICATES
> ; FORTRAN-TO-LISP::GENERATE-CALL-TO-ROUTINE
> ;;;*** Warning in FORTRAN-TO-LISP::MAYBE-CONVERT-ARRAY-REF-TO-SLICE: 
> R-INFO is bound but not referenced
> ; FORTRAN-TO-LISP::MAYBE-CONVERT-ARRAY-REF-TO-SLICE
> ; FORTRAN-TO-LISP::PARSE-SUBROUTINE-CALL
> ; FORTRAN-TO-LISP::PARSE-DO-LOOP
> ; FORTRAN-TO-LISP::PARSE-IF-THEN
> ; FORTRAN-TO-LISP::PARSE-IF-GOTO
> ; FORTRAN-TO-LISP::PARSE-IF
> ; FORTRAN-TO-LISP::PARSE-RETURN
> ; FORTRAN-TO-LISP::PARSE-PARAMETER
> ; FORTRAN-TO-LISP::PARSE-SAVE
> ; FORTRAN-TO-LISP::PARSE-COMMON
> ; FORTRAN-TO-LISP::UPDATE_CM_ARRAY_DIMS
> ; FORTRAN-TO-LISP::EXTRACT-ATOMS
> ; FORTRAN-TO-LISP::PARSE-CHAR-DECL
> ;;;*** Warning in FORTRAN-TO-LISP::PARSE-DATA: RET is bound but not 
> referenced
> ; FORTRAN-TO-LISP::PARSE-DATA
> ; FORTRAN-TO-LISP::PARSE-DATA1
> ; FORTRAN-TO-LISP::PARSE-EXTERNAL
> ; FORTRAN-TO-LISP::TAIL-CHOP
> ; FORTRAN-TO-LISP::HEAD-CHOP
> ; FORTRAN-TO-LISP::LIST-SPLIT
> ; FORTRAN-TO-LISP::GEN-LIST-SPLIT
> ; FORTRAN-TO-LISP::CONCAT
> ; FORTRAN-TO-LISP::LIST-SPLIT-MULTI
> ; FORTRAN-TO-LISP::LIST-SPLIT-BIN
> ; FORTRAN-TO-LISP::LIST-SPLIT-MULTI-STRING
> ; FORTRAN-TO-LISP::CONCAT-OPERATORS
> ; FORTRAN-TO-LISP::CONVERT-DATA-TYPE
> ; FORTRAN-TO-LISP::REDUCE-DATA-TYPE
> ; FORTRAN-TO-LISP::BINDING-VALUE
> ; FORTRAN-TO-LISP::VARIABLEP
> ; FORTRAN-TO-LISP::VARIABLE-VALUE
> ; FORTRAN-TO-LISP::UNIFY
> ; FORTRAN-TO-LISP::MATCH
> ; FORTRAN-TO-LISP::MAYBE-EXTEND-BINDINGS
> ; FORTRAN-TO-LISP::LINEREAD
> ; FORTRAN-TO-LISP::READ-SIX-CHARS
> ; FORTRAN-TO-LISP::CONST
> ; FORTRAN-TO-LISP::BRACKETS-CHECK
> ; FORTRAN-TO-LISP::SUBSEQUENCE
> ; FORTRAN-TO-LISP::GEN-APPEND
> ; FORTRAN-TO-LISP::APPEND1
> ; FORTRAN-TO-LISP::PLUS
> ; FORTRAN-TO-LISP::END-CDR
> ; FORTRAN-TO-LISP::SUB1
> ; FORTRAN-TO-LISP::NEQUAL
> ; FORTRAN-TO-LISP::DIFF
> ; FORTRAN-TO-LISP::LESSP
> ; FORTRAN-TO-LISP::GREATERP
> ; FORTRAN-TO-LISP::F-TO-L
> ; FORTRAN-TO-LISP::PPRINT-FDO
> ; FORTRAN-TO-LISP::PPRINT-WITH-ARRAY-DATA
> ; FORTRAN-TO-LISP::PPRINT-WITH-MULTI-ARRAY-DATA
> ; (TOP-LEVEL-FORM 5)
> ; (TOP-LEVEL-FORM 6)
> ; (TOP-LEVEL-FORM 7)
> ; (TOP-LEVEL-FORM 8)
>
> ;; *** Automatic Minor Clean Down
> ; Loading fasl file z:\lang\cl\clocc\f2cl\src\f2cl1.fsl
> ;;; Compiling file z:\lang\cl\clocc\f2cl\src\f2cl2.l ...
> ;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
> ;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3, GC safety = 3
> ;;; Source level debugging is on
> ;;; Source file recording is  on
> ;;; Cross referencing is on
> ; (TOP-LEVEL-FORM 1)
> ; (TOP-LEVEL-FORM 2)
> ; (TOP-LEVEL-FORM 3)
> ; FORTRAN-TO-LISP::SUBST-SPLICE
> ; FORTRAN-TO-LISP::EXTRACT
> ; FORTRAN-TO-LISP::LIST-ITP
> ; FORTRAN-TO-LISP::TPL-SUBST
> ; FORTRAN-TO-LISP::TPL-SUBPAIR
> ; FORTRAN-TO-LISP::SYMBOL-LISTP
> ; FORTRAN-TO-LISP::CHECK-TAGS-GO
> ; FORTRAN-TO-LISP::FIND-GOS
> ; FORTRAN-TO-LISP::ID-EXPRESSION
> ; FORTRAN-TO-LISP::ID-TERM
> ; FORTRAN-TO-LISP::ID-FACTOR1
> ; FORTRAN-TO-LISP::LOOKUP-ARRAY-BOUNDS
> ; FORTRAN-TO-LISP::UPDATE-CALLED-FUNCTIONS-LIST
> ; FORTRAN-TO-LISP::ID-FACTOR
> ; (TOP-LEVEL-FORM 4)
>
> ;; *** Automatic Minor Clean Down
> ; Loading fasl file z:\lang\cl\clocc\f2cl\src\f2cl2.fsl
> ;;; Compiling file z:\lang\cl\clocc\f2cl\src\f2cl3.l ...
> ;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
> ;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3, GC safety = 3
> ;;; Source level debugging is on
> ;;; Source file recording is  on
> ;;; Cross referencing is on
> ; (TOP-LEVEL-FORM 1)
> ; (TOP-LEVEL-FORM 2)
> ; FORTRAN-TO-LISP::SUB-STRING
> ; FORTRAN-TO-LISP::MATCH-SEPARATED
> ; FORTRAN-TO-LISP::EXACT-MATCH
> ; FORTRAN-TO-LISP::MATCH-ATOMS
> ; FORTRAN-TO-LISP::MATCH-ATOMS-LISTS
> ; FORTRAN-TO-LISP::ATOMCAR
> ; FORTRAN-TO-LISP::ATOMCDR
> ; FORTRAN-TO-LISP::MATCH-STORE-ATOMS
> ; FORTRAN-TO-LISP::MATCH-STORE
> ; FORTRAN-TO-LISP::RESTRICT-TEST
> ; FORTRAN-TO-LISP::MATCH-RESTRICT
> ; (TOP-LEVEL-FORM 3)
> ; Loading fasl file z:\lang\cl\clocc\f2cl\src\f2cl3.fsl
> ;;; Compiling file z:\lang\cl\clocc\f2cl\src\f2cl4.l ...
> ;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
> ;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3, GC safety = 3
> ;;; Source level debugging is on
> ;;; Source file recording is  on
> ;;; Cross referencing is on
> ; (TOP-LEVEL-FORM 1)
> ; (TOP-LEVEL-FORM 2)
> ; FORTRAN-TO-LISP::MEMBERQ
> ; FORTRAN-TO-LISP::ID-LOGICAL
> ; FORTRAN-TO-LISP::ID-LOGICAL-AND
> ; FORTRAN-TO-LISP::ID-LOGICAL-NOT
> ; FORTRAN-TO-LISP::ID-RELATIONAL
> ; (TOP-LEVEL-FORM 3)
> ; Loading fasl file z:\lang\cl\clocc\f2cl\src\f2cl4.fsl
> ;;; Compiling file z:\lang\cl\clocc\f2cl\src\f2cl5.l ...
> ;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
> ;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3, GC safety = 3
> ;;; Source level debugging is on
> ;;; Source file recording is  on
> ;;; Cross referencing is on
> ; (TOP-LEVEL-FORM 1)
> ; (TOP-LEVEL-FORM 2)
> ; (TOP-LEVEL-FORM 3)
> ; (DEFVAR FORTRAN-TO-LISP::*FORTRAN-KEYWORDS*)
> ; FORTRAN-TO-LISP::CHECK_NEW_VBLES
> ; FORTRAN-TO-LISP::PRETTY-DECLS
> ; FORTRAN-TO-LISP::LOOKUP-VBLE-TYPE
> ; FORTRAN-TO-LISP::FORTRAN-CONTAGION
> ;;;*** Warning in FORTRAN-TO-LISP::GET-FUN-ARG-TYPE: RESULT is bound 
> but not referenced
> ; FORTRAN-TO-LISP::GET-FUN-ARG-TYPE
> ; FORTRAN-TO-LISP::GET-UPGRADED-FUN-ARG-TYPE
> ; FORTRAN-TO-LISP::GET-ARG-DECL
> ; FORTRAN-TO-LISP::MAKE-FCN-DECL
> ; FORTRAN-TO-LISP::OPTIMIZE-F2CL/
> ; FORTRAN-TO-LISP::OPTIMIZE-INTEGER-ARITHMETIC
> ; FORTRAN-TO-LISP::FIXUP-EXTERNAL-FUNCTION-REFS
> ; FORTRAN-TO-LISP::FIXUP-EXPR-MUL
> ; FORTRAN-TO-LISP::FIXUP-EXPRESSION
> ; FORTRAN-TO-LISP::FIXUP-RELOP
> ; FORTRAN-TO-LISP::MERGE-OPS
> ; FORTRAN-TO-LISP::CREATE-SYM-MACROS
> ; FORTRAN-TO-LISP::COERCE-PARAMETER-ASSIGN
> ; FORTRAN-TO-LISP::FLATTEN-LIST
> ;;;*** Warning in FORTRAN-TO-LISP::ENTRY-FUNCTIONS: N-ENTRIES is bound 
> but not referenced
> ; FORTRAN-TO-LISP::ENTRY-FUNCTIONS
> ;;;*** Warning in FORTRAN-TO-LISP::INSERT-DECLARATIONS: 
> ADDITIONAL-ARGS is bound but not referenced
> ; FORTRAN-TO-LISP::INSERT-DECLARATIONS
> ; FORTRAN-TO-LISP::VBLE-DECLARED-TWICE-P
> ; FORTRAN-TO-LISP::MAKE-INITIALISATION
> ; FORTRAN-TO-LISP::REMOVE-*DATA-INIT*-VAR
> ; FORTRAN-TO-LISP::FORTRAN-DATA-INIT
> ; FORTRAN-TO-LISP::MAKE_MAKE-ARRAY_STMT
> ; FORTRAN-TO-LISP::MAKE-LABELS-FORM
> ; FORTRAN-TO-LISP::F2CL-ARRAY-TOTAL-SIZE
> ; FORTRAN-TO-LISP::MAKE-DECLARATION
> ; FORTRAN-TO-LISP::MAKE-CHAR-DECL
> ; FORTRAN-TO-LISP::MAKE-CHAR-INIT
> ; FORTRAN-TO-LISP::GET-IMPLICIT-TYPE
> ;;;*** Warning in FORTRAN-TO-LISP::GET_ARRAY_TYPE: VBLE-IS-FORMAL-ARG 
> is bound but not referenced
> ; FORTRAN-TO-LISP::GET_ARRAY_TYPE
> ; FORTRAN-TO-LISP::DEFAULT-INT-P
> ; FORTRAN-TO-LISP::VBLE-IS-ARRAY-P
> ; FORTRAN-TO-LISP::SYM-IS-FUN-NAME
> ; FORTRAN-TO-LISP::SYM-IS-NUMBER-P
> ; FORTRAN-TO-LISP::MAKE-SPECIAL-PROCLAMATION
> ; FORTRAN-TO-LISP::MAKE-SPECIAL-VAR-DECL
> ; (DEFPARAMETER FORTRAN-TO-LISP::+RESERVED-LISP-NAMES+)
> ; (DEFPARAMETER FORTRAN-TO-LISP::+ALLOWED-LISP-NAMES+)
> ; FORTRAN-TO-LISP::CHECK-RESERVED-LISP-NAMES
> ; FORTRAN-TO-LISP::FIX-STRUCTURE
> ; FORTRAN-TO-LISP::FIX-IFTHEN
> ; FORTRAN-TO-LISP::END-DO-P
> ; FORTRAN-TO-LISP::LABEL-MATCHES-DOLABEL-P
> ; FORTRAN-TO-LISP::FIX-DO
> ; FORTRAN-TO-LISP::REMOVE-PREFIX
> ; FORTRAN-TO-LISP::MULTIPLE-DO-LABELP
> ; FORTRAN-TO-LISP::FIX-TAGBODIES
> ; (TOP-LEVEL-FORM 4)
> ; FORTRAN-TO-LISP::PARSE-FORMAT
> ; FORTRAN-TO-LISP::PARSE-WRITE
> ; FORTRAN-TO-LISP::PARSE-PRINT
> ; FORTRAN-TO-LISP::PARSE-READ
> ; FORTRAN-TO-LISP::GET_FORMAT_STMT
> ; FORTRAN-TO-LISP::PARSE_FORMAT_DEST
> ; FORTRAN-TO-LISP::PARSE-OUTPUT-ARGUMENT
> ; FORTRAN-TO-LISP::PARSE-IMPLIED-DO
> ; FORTRAN-TO-LISP::PARSE-DLIST
> ; FORTRAN-TO-LISP::ARRAY-LIST
> ; FORTRAN-TO-LISP::PARSE-FORMAT1
> ; FORTRAN-TO-LISP::DESTRUCT-DESCRIPTOR-LIST
> ; FORTRAN-TO-LISP::READ-NUMBER-FROM-STREAM
> ; FORTRAN-TO-LISP::PATTERN-MATCH-AND-BIND
> ; FORTRAN-TO-LISP::PARSE-FORMAT-DESCRIPTOR-LIST
> ; FORTRAN-TO-LISP::FIXNUM-STRING
> ; FORTRAN-TO-LISP::PARSE-FORMAT-DESCRIPTOR-A
> ; FORTRAN-TO-LISP::PRINT-I-FORMAT
> ; FORTRAN-TO-LISP::PARSE-FORMAT-DESCRIPTOR-I
> ; FORTRAN-TO-LISP::PARSE-FORMAT-DESCRIPTOR-F
> ; FORTRAN-TO-LISP::PARSE-FORMAT-DESCRIPTOR-E
> ; FORTRAN-TO-LISP::PARSE-FORMAT-DESCRIPTOR-D
> ; FORTRAN-TO-LISP::PARSE-FORMAT-DESCRIPTOR-G
> ; FORTRAN-TO-LISP::PARSE-FORMAT-DESCRIPTOR-/
> ; FORTRAN-TO-LISP::PARSE-FORMAT-DESCRIPTOR-TR
> ; FORTRAN-TO-LISP::PARSE-FORMAT-DESCRIPTOR-X
> ; FORTRAN-TO-LISP::PARSE-FORMAT-DESCRIPTOR-S
> ; FORTRAN-TO-LISP::PARSE-FORMAT-DESCRIPTOR-H
> ; FORTRAN-TO-LISP::PARSE-DEFAULT-FORMAT-DESCRIPTOR
> ; FORTRAN-TO-LISP::FIX-SLASHES
> ; FORTRAN-TO-LISP::MAKE-COMMON-BLOCK-VARS
> ; FORTRAN-TO-LISP::MAKE-COMMON-BLOCK-STRUCTURE
> ; FORTRAN-TO-LISP::MAKE-COMMON-BLOCK-VAR-INIT
> ; FORTRAN-TO-LISP::MAKE-COMMON-BLOCK-INIT
> ; (TOP-LEVEL-FORM 5)
>
> ;; *** Automatic Minor Clean Down
> ; Loading fasl file z:\lang\cl\clocc\f2cl\src\f2cl5.fsl
> ;;; Compiling file z:\lang\cl\clocc\f2cl\src\f2cl6.l ...
> ;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
> ;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3, GC safety = 3
> ;;; Source level debugging is on
> ;;; Source file recording is  on
> ;;; Cross referencing is on
> ; (TOP-LEVEL-FORM 1)
> ; (TOP-LEVEL-FORM 2)
> ; (TOP-LEVEL-FORM 3)
> ; (DEFVAR FORTRAN-TO-LISP::*INP*)
> ; (DEFVAR FORTRAN-TO-LISP::*COMMENT-LINE-CHARACTERS*)
> ; FORTRAN-TO-LISP::FIND-QUOTE
> ; FORTRAN-TO-LISP::PROCESS-FORMAT-LINE
> ; FORTRAN-TO-LISP::PREPROCESS
> ; FORTRAN-TO-LISP::WRITE-COMMENT-LINE
> ; FORTRAN-TO-LISP::REPLACE_LOGL_OPS
> ; FORTRAN-TO-LISP::ADJUST_NRS
> ; FORTRAN-TO-LISP::PARSE-LOGL-OP
> ; FORTRAN-TO-LISP::REPLACE-STR
> ; FORTRAN-TO-LISP::PARSE-NUMBER
> ; (TOP-LEVEL-FORM 4)
>
> ;; *** Automatic Minor Clean Down
> ; Loading fasl file z:\lang\cl\clocc\f2cl\src\f2cl6.fsl
> ;;; Compiling file z:\lang\cl\clocc\f2cl\src\f2cl7.l ...
> ;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
> ;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3, GC safety = 3
> ;;; Source level debugging is on
> ;;; Source file recording is  on
> ;;; Cross referencing is on
> ; (TOP-LEVEL-FORM 1)
> ; (TOP-LEVEL-FORM 2)
> ; (DEFVAR FORTRAN-TO-LISP::*PRUNE_LABELS*)
> ; (TOP-LEVEL-FORM 3)
> ; FORTRAN-TO-LISP::FIND-GO-LABELS
> ; FORTRAN-TO-LISP::COUNT-GO-END
> ; FORTRAN-TO-LISP::LABELP
> ; FORTRAN-TO-LISP::FIND-ALL-LABELS
> ; FORTRAN-TO-LISP::REMOVE-FROM-TREE
> ; FORTRAN-TO-LISP::PRUNE-LABELS
> ; FORTRAN-TO-LISP::COND-REMOVE-END-LABEL
> ; FORTRAN-TO-LISP::FIND-DECLARATIONS
> ; (TOP-LEVEL-FORM 4)
> ; Loading fasl file z:\lang\cl\clocc\f2cl\src\f2cl7.fsl
> ;;; Compiling file z:\lang\cl\clocc\f2cl\src\macros.l ...
> ;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0
> ;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3, GC safety = 3
> ;;; Source level debugging is on
> ;;; Source file recording is  on
> ;;; Cross referencing is on
> ; (TOP-LEVEL-FORM 1)
> ; (TOP-LEVEL-FORM 2)
> ; (TOP-LEVEL-FORM 3)
> ; F2CL-LIB::REXPT
> ; (DEFVAR F2CL-LIB:*CHECK-ARRAY-BOUNDS*)
> ; (DEFTYPE F2CL-LIB:LOGICAL)
> ; (DEFTYPE F2CL-LIB:INTEGER4)
> ; (DEFTYPE F2CL-LIB:INTEGER2)
> ; (DEFTYPE F2CL-LIB:INTEGER1)
> ; (DEFTYPE F2CL-LIB:REAL8)
> ; (DEFTYPE F2CL-LIB:REAL4)
> ; (DEFTYPE F2CL-LIB:COMPLEX8)
> ; (DEFTYPE F2CL-LIB:COMPLEX16)
> ; (DEFTYPE F2CL-LIB:ARRAY-DOUBLE-FLOAT)
> ; (DEFTYPE F2CL-LIB:ARRAY-INTEGER4)
> ; (DEFTYPE F2CL-LIB:ARRAY-SINGLE-FLOAT)
> ; (DEFTYPE F2CL-LIB:ARRAY-STRINGS)
> ; (DEFCONSTANT F2CL-LIB:%FALSE%)
> ; (DEFCONSTANT F2CL-LIB:%TRUE%)
> ; F2CL-LIB::COL-MAJOR-INDEX
> ; F2CL-LIB::CHECK-ARRAY-BOUNDS
> ; F2CL-LIB:FREF
> ; F2CL-LIB:FSET
> ; F2CL-LIB:FREF-STRING
> ; F2CL-LIB:FSET-STRING
> ; F2CL-LIB:F2CL-//
> ; F2CL-LIB::FIND-ARRAY-DATA
> ; F2CL-LIB:WITH-ARRAY-DATA
> ; F2CL-LIB::MULTI-ARRAY-DATA-AUX
> ; F2CL-LIB:WITH-MULTI-ARRAY-DATA
> ; F2CL-LIB:ARRAY-SLICE
> ; F2CL-LIB:ARRAY-INITIALIZE
> ; F2CL-LIB::WHILE
> ; F2CL-LIB:FORTRAN_COMMENT
> ; F2CL-LIB:FDO
> ; F2CL-LIB:F2CL/
> ; F2CL-LIB:INT-ADD
> ; F2CL-LIB::CONVERT-INT-SUB
> ; F2CL-LIB:INT-SUB
> ; F2CL-LIB:INT-MUL
> ; F2CL-LIB:ARITHMETIC-IF
> ; F2CL-LIB::COMPUTED-GOTO-AUX
> ; F2CL-LIB:COMPUTED-GOTO
> ; F2CL-LIB::ASSIGNED-GOTO-AUX
> ; F2CL-LIB:ASSIGNED-GOTO
> ; (TOP-LEVEL-FORM 4)
> ; F2CL-LIB:INT
> ; F2CL-LIB:INT
> ; F2CL-LIB:IFIX
> ; F2CL-LIB:IFIX
> ; F2CL-LIB::IDFIX
> ; F2CL-LIB::IDFIX
> ; (TOP-LEVEL-FORM 5)
> ; F2CL-LIB:AINT
> ; F2CL-LIB:AINT
> ; F2CL-LIB:DINT
> ; F2CL-LIB:DINT
> ; F2CL-LIB:ANINT
> ; F2CL-LIB:ANINT
> ; F2CL-LIB:DNINT
> ; F2CL-LIB:DNINT
> ; F2CL-LIB:NINT
> ; F2CL-LIB:NINT
> ; F2CL-LIB:IDNINT
> ; F2CL-LIB:IDNINT
> ; (TOP-LEVEL-FORM 6)
> ; F2CL-LIB:FREAL
> ; F2CL-LIB:FREAL
> ; F2CL-LIB:SNGL
> ; F2CL-LIB:SNGL
> ; F2CL-LIB:DBLE
> ; F2CL-LIB:DBLE
> ; F2CL-LIB:CMPLX
> ; F2CL-LIB:CMPLX
> ; F2CL-LIB:ICHAR
> ; F2CL-LIB:FCHAR
> ; (TOP-LEVEL-FORM 7)
> ; F2CL-LIB:IABS
> ; F2CL-LIB:IABS
> ; F2CL-LIB:DABS
> ; F2CL-LIB:DABS
> ; F2CL-LIB:CABS
> ; F2CL-LIB:CABS
> ; F2CL-LIB:AMOD
> ; F2CL-LIB:AMOD
> ; F2CL-LIB:DMOD
> ; F2CL-LIB:DMOD
> ; (TOP-LEVEL-FORM 8)
> ; F2CL-LIB:ISIGN
> ; F2CL-LIB:ISIGN
> ; F2CL-LIB:SIGN
> ; F2CL-LIB:SIGN
> ; F2CL-LIB:DSIGN
> ; F2CL-LIB:DSIGN
> ; (TOP-LEVEL-FORM 9)
> ; F2CL-LIB:IDIM
> ; F2CL-LIB:IDIM
> ; F2CL-LIB:DIM
> ; F2CL-LIB:DIM
> ; F2CL-LIB::DDIM
> ; F2CL-LIB::DDIM
> ; F2CL-LIB:DPROD
> ; F2CL-LIB:MAX0
> ; F2CL-LIB:AMAX1
> ; F2CL-LIB:DMAX1
> ; F2CL-LIB:MAX1
> ; F2CL-LIB:AMAX0
> ; F2CL-LIB:MIN0
> ; F2CL-LIB:AMIN1
> ; F2CL-LIB:DMIN1
> ; F2CL-LIB::AMIN0
> ; F2CL-LIB:MIN1
> ; F2CL-LIB:LEN
> ; F2CL-LIB:INDEX
> ; F2CL-LIB:LGE
> ; F2CL-LIB:LGT
> ; F2CL-LIB::LLE
> ; F2CL-LIB::LLT
> ; F2CL-LIB:FSTRING-/=
> ; F2CL-LIB:FSTRING-=
> ; F2CL-LIB:FSTRING->
> ; F2CL-LIB:FSTRING->=
> ; F2CL-LIB:FSTRING-<
> ; F2CL-LIB:FSTRING-<=
> ; (TOP-LEVEL-FORM 10)
> ; F2CL-LIB:AIMAG
> ; F2CL-LIB:AIMAG
> ; F2CL-LIB:CONJG
> ; F2CL-LIB:CONJG
> ; (TOP-LEVEL-FORM 11)
> ; F2CL-LIB:FSQRT
> ; F2CL-LIB:FSQRT
> ; F2CL-LIB:FLOG
> ; F2CL-LIB:FLOG
> ; (TOP-LEVEL-FORM 12)
> ; F2CL-LIB:DSQRT
> ; F2CL-LIB:DSQRT
> ; F2CL-LIB:CSQRT
> ; F2CL-LIB:CSQRT
> ; F2CL-LIB:ALOG
> ; F2CL-LIB:ALOG
> ; F2CL-LIB:DLOG
> ; F2CL-LIB:DLOG
> ; F2CL-LIB:CLOG
> ; F2CL-LIB:CLOG
> ; F2CL-LIB:ALOG10
> ; F2CL-LIB:ALOG10
> ; F2CL-LIB:DLOG10
> ; F2CL-LIB:DLOG10
> ; (TOP-LEVEL-FORM 13)
> ; F2CL-LIB:LOG10
> ; F2CL-LIB:LOG10
> ; (TOP-LEVEL-FORM 14)
> ; F2CL-LIB:DEXP
> ; F2CL-LIB:DEXP
> ; F2CL-LIB:CEXP
> ; F2CL-LIB:CEXP
> ; (TOP-LEVEL-FORM 15)
> ; F2CL-LIB:DSIN
> ; F2CL-LIB:DSIN
> ; F2CL-LIB:CSIN
> ; F2CL-LIB:CSIN
> ; F2CL-LIB:DCOS
> ; F2CL-LIB:DCOS
> ; F2CL-LIB:CCOS
> ; F2CL-LIB:CCOS
> ; F2CL-LIB:DTAN
> ; F2CL-LIB:DTAN
> ; F2CL-LIB::CTAN
> ; F2CL-LIB::CTAN
> ; F2CL-LIB:DASIN
> ; F2CL-LIB:DASIN
> ; F2CL-LIB:DACOS
> ; F2CL-LIB:DACOS
> ; F2CL-LIB:DATAN
> ; F2CL-LIB:DATAN
> ; F2CL-LIB:ATAN2
> ; F2CL-LIB:ATAN2
> ; F2CL-LIB:DATAN2
> ; F2CL-LIB:DATAN2
> ; F2CL-LIB:DSINH
> ; F2CL-LIB:DSINH
> ; F2CL-LIB:DCOSH
> ; F2CL-LIB:DCOSH
> ; F2CL-LIB:DTANH
> ; F2CL-LIB:DTANH
> ; (TOP-LEVEL-FORM 16)
> ; F2CL-LIB:FFLOAT
> ; F2CL-LIB:FFLOAT
> ; F2CL-LIB::PROCESS-IMPLIED-DO
> ; F2CL-LIB:DATA-IMPLIED-DO
> ; (DEFPARAMETER F2CL-LIB::*LUN-HASH*)
> ; F2CL-LIB::LUN->STREAM
> ; F2CL-LIB::INIT-FORTRAN-IO
> ; F2CL-LIB::CLOSE-FORTRAN-IO
> ; (TOP-LEVEL-FORM 17)
> ; F2CL-LIB:FFORMAT
> ; F2CL-LIB::EXECUTE-FORMAT
> ; F2CL-LIB::EXECUTE-FORMAT-MAIN
> ; F2CL-LIB:F2CL-INIT-STRING
> ; F2CL-LIB:F2CL-SET-STRING
> ; F2CL-LIB::F2CL-STRING
> ; F2CL-LIB:D1MACH
> ; F2CL-LIB:R1MACH
> ; F2CL-LIB:I1MACH
> ; (TOP-LEVEL-FORM 18)
>
> ;; *** Automatic Minor Clean Down
> ; Loading fasl file z:\lang\cl\clocc\f2cl\src\macros.fsl
>
> The following functions are undefined:
> FORTRAN-TO-LISP::UNIQUE-ELEMENTS which is referenced by 
> FORTRAN-TO-LISP::CHECK-TAGS-GO
> F2CL-LIB::MAKE-LABEL which is referenced by F2CL-LIB::ASSIGNED-GOTO-AUX
> FORTRAN-TO-LISP::NTHCHAR which is referenced by 
> FORTRAN-TO-LISP::ATOMCAR
> (#<MODULE: src>)
>
> CL-USER 27 >
>
>
>
> -------------------------------------------------------
> This SF.Net email is sponsored by BEA Weblogic Workshop
> FREE Java Enterprise J2EE developer tools!
> Get your free copy of BEA WebLogic Workshop 8.1 today.
> http://ads.osdn.com/?ad_id=4721&alloc_id=10040&op=click
> _______________________________________________
> clocc-list mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/clocc-list
>
--
Marco Antoniotti					http://bioinformatics.nyu.edu
NYU Courant Bioinformatics Group		tel. +1 - 212 - 998 3488
715 Broadway 10th FL				fax. +1 - 212 - 998 3484
New York, NY, 10003, U.S.A.



-------------------------------------------------------
This SF.Net email is sponsored by BEA Weblogic Workshop
FREE Java Enterprise J2EE developer tools!
Get your free copy of BEA WebLogic Workshop 8.1 today.
http://ads.osdn.com/?ad_id=4721&alloc_id=10040&op=click