From: Marco A. <ma...@cs...> - 2004-07-21 21:19:12
|
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 > |