#2893 warnings in maxima 5-35-1-2 SBCL on windows

[raghu char]

in: PROGN (DEFPROP $F T TRANSLATED)
; (SETQ MAXIMA::$X 2)
;
; caught WARNING:
; undefined variable: $X
;
; compilation unit finished
; Undefined variable:
; $X
; caught 1 WARNING condition

; file: C:/Program Files (x86)/Maxima-sbcl-5.35.1.2/share/maxima/5.35.1.2/share/lbfgs/lb1.lisp
; in: DEFUN LB1
; (PROG ((I 0))
; (DECLARE (TYPE (INTEGER) I))
; (COND
; ((= ITER 0)
; (F2CL-LIB:FFORMAT MP
; ("*******"
; "~%"))
; (F2CL-LIB:FFORMAT MP
; (" N=" 1 # " NUMBER OF CORRECTIONS=" 1 # "~%"
; " INITIAL VALUES" "~%")
; N M)
; (F2CL-LIB:FFORMAT MP (" F= " 1 # " GNORM= " 1 # "~%") F GNORM)
; (COND (# # # # #))
; (F2CL-LIB:FFORMAT MP
; ("*******"
; "~%"))
; (F2CL-LIB:FFORMAT MP
; ("~%" " I NFN" "~5@T" "FUNC" "~20@T" "GNORM" "~19@T"
; "STEPLENGTH" "~%" "~%")))
; (T
; (IF (AND # #)
; (GO END_LABEL))
; (COND (# #) (T # #)) (COND (# # # #))
; (IF FINISH
; (F2CL-LIB:FFORMAT MP #))))
; (GO END_LABEL)
; END_LABEL
; (RETURN (VALUES NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL)))
; --> BLOCK
; ==>
; (LET ((I 0))
; (DECLARE (TYPE (INTEGER) I))
; (TAGBODY
; (COND
; ((= ITER 0) (F2CL-LIB:FFORMAT MP #) (F2CL-LIB:FFORMAT MP # N M)
; (F2CL-LIB:FFORMAT MP # F GNORM) (COND #) (F2CL-LIB:FFORMAT MP #)
; (F2CL-LIB:FFORMAT MP #))
; (T
; (IF #
; #)
; (COND # #) (COND #)
; (IF FINISH
; #)))
; (GO END_LABEL)
; END_LABEL
; (RETURN (VALUES NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL))))
;
; caught STYLE-WARNING:
; The variable I is defined but never used.
;
; compilation unit finished
; caught 1 STYLE-WARNING condition

[raghu char]

Here is some addl info:

Maxima version: "5.35.1.2"
Maxima build date: "2015-01-15 21:27:01"
Host type: "i686-pc-mingw32"
Lisp implementation type: "SBCL"
Lisp implementation version: "1.2.7"

the warnings occur while running the tests., specifically while Running
tests in rtest16: ( i think?) in Xmaxima

On Thu, 29 Jan 2015 01:34:57 +0530, Robert Dodier
robert_dodier@users.sf.net wrote:

status: open --> closed
Comment:

About the second warning (apparently from loading lbfgs), I believe
that's fixed by commit [d945186f] (to appear in >the next release).

About the first warning,
in: PROGN (DEFPROP $F T TRANSLATED)
; (SETQ MAXIMA::$X 2)
;; caught WARNING:
; undefined variable: $X
;; compilation unit finished
; Undefined variable:
; $X
; caught 1 WARNING condition

I guess (as you didn't say) that this results from translating or
compiling a function in which there is an assignment x:2 >and x is not
an argument of the function or a local (block) variable. Perhaps it
would help if you describe how you >encountered that message.

I will open a separate report for the first warning and close this one.

[bugs:#2893] warnings in maxima 5-35-1-2 SBCL on windows

Status: closed
Group: None
Created: Sat Jan 24, 2015 07:09 AM UTC by raghu char
Last Updated: Sat Jan 24, 2015 07:09 AM UTC
Owner: nobody

in: PROGN (DEFPROP $F T TRANSLATED)
; (SETQ MAXIMA::$X 2)
;; caught WARNING:
; undefined variable: $X
;; compilation unit finished
; Undefined variable:
; $X
; caught 1 WARNING condition

; file: C:/Program Files
(x86)/Maxima-sbcl-5.35.1.2/share/maxima/5.35.1.2/share/lbfgs/lb1.lisp
; in: DEFUN LB1
; (PROG ((I 0))
; (DECLARE (TYPE (INTEGER) I))
; (COND
; ((= ITER 0)
; (F2CL-LIB:FFORMAT MP
; ("*"
; "~%"))
; (F2CL-LIB:FFORMAT MP
; (" N=" 1 # " NUMBER OF CORRECTIONS=" 1 # "~%"
; " INITIAL VALUES" "~%")
; N M)
; (F2CL-LIB:FFORMAT MP (" F= " 1 # " GNORM= " 1 # "~%") F GNORM)
; (COND (# # # # #))
; (F2CL-LIB:FFORMAT MP
; ("*"
; "~%"))
; (F2CL-LIB:FFORMAT MP
; ("~%" " I NFN" "~5@T" "FUNC" "~20@T" "GNORM" "~19@T"
; "STEPLENGTH" "~%" "~%")))
; (T
; (IF (AND # #)
; (GO END_LABEL))
; (COND (# #) (T # #)) (COND (# # # #))
; (IF FINISH
; (F2CL-LIB:FFORMAT MP #))))
; (GO END_LABEL)
; END_LABEL
; (RETURN (VALUES NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL)))
; --> BLOCK; ==>
; (LET ((I 0))
; (DECLARE (TYPE (INTEGER) I))
; (TAGBODY
; (COND
; ((= ITER 0) (F2CL-LIB:FFORMAT MP #) (F2CL-LIB:FFORMAT MP # N M)
; (F2CL-LIB:FFORMAT MP # F GNORM) (COND #) (F2CL-LIB:FFORMAT MP #)
; (F2CL-LIB:FFORMAT MP #))
; (T
; (IF #
; #)
; (COND # #) (COND #)
; (IF FINISH
; #)))
; (GO END_LABEL)
; END_LABEL
; (RETURN (VALUES NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL))))
;; caught STYLE-WARNING:
; The variable I is defined but never used.
;; compilation unit finished
; caught 1 STYLE-WARNING condition

Sent from sourceforge.net because you indicated interest in
https://sourceforge.net/p/maxima/bugs/2893/

To unsubscribe from further messages, please visit
https://sourceforge.net/auth/subscriptions/

--
regards
raghu

[Robert Dodier]

About the second warning (apparently from loading lbfgs), I believe that's fixed by commit [d945186f] (to appear in the next release).

About the first warning,

in: PROGN (DEFPROP $F T TRANSLATED)
;     (SETQ MAXIMA::$X 2)
; 
; caught WARNING:
;   undefined variable: $X
; 
; compilation unit finished
;   Undefined variable:
;     $X
;   caught 1 WARNING condition

I guess (as you didn't say) that this results from translating or compiling a function in which there is an assignment x:2 and x is not an argument of the function or a local (block) variable. Perhaps it would help if you describe how you encountered that message.

I will open a separate report for the first warning and close this one.

[Robert Dodier]

Thanks for the additional info. I see the place the warning is coming from in rtest16 -- it is the same problem as described in #2897.