Ah yeah, I kinda knew that was the reason. Just didn't want it to be. Anyway though, I got it to do what I wanted it to. Might not be the best way, but it works:
Code: Select all
(loop for i from 0 to 4 do
(format t "~a~&" (loop for m from 0 to 4 do
(format t "~a" (aref *hi* i m)))))
NILNILNILNILNILNIL
NILNILNILNILNILNIL
NILNILNILNILNILNIL
NILNILNILNILNILNIL
NILNILNILNILNILNIL
Tried it with PRINT's and PRINC's, but the fact that it returns a NIL each time makes it look bad. Anyway to get it out of there? FORMAT only returns the NIL at the very end, which is nice.
Code: Select all
(loop for i from 0 to 4 do
(print (loop for m from 0 to 4 do
(princ (aref *hi* i m)))))
NILNILNILNILNIL
NIL NILNILNILNILNIL
NIL NILNILNILNILNIL
NIL NILNILNILNILNIL
NIL NILNILNILNILNIL
NIL
NIL
EDIT: I made it a bit better, looks like I really only need the first FORMAT call. Can use princ after that.
Code: Select all
(loop for i from 0 to 4 do
(format t "~a~&" (loop for m from 0 to 4 do
(princ (aref *hi* i m)))))
NILNILNILNILNILNIL
NILNILNILNILNILNIL
NILNILNILNILNILNIL
NILNILNILNILNILNIL
NILNILNILNILNILNIL
Thanks for the help!