/[cmucl]/src/compiler/array-tran.lisp
ViewVC logotype

Diff of /src/compiler/array-tran.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.31 by gerd, Sat Feb 22 16:11:12 2003 UTC revision 1.32 by gerd, Sun Apr 13 11:57:17 2003 UTC
# Line 369  Line 369 
369                    '(%array-dimension array 0))                    '(%array-dimension array 0))
370                   ((nil)                   ((nil)
371                    '(length array))                    '(length array))
372                   (*                   ((:maybe *)
373                    (give-up "Can't tell if array is simple."))))                    (give-up "Can't tell if array is simple."))))
374                (t                (t
375                 '(%array-dimension array axis)))))))                 '(%array-dimension array axis)))))))

Legend:
Removed from v.1.31  
changed lines
  Added in v.1.32

  ViewVC Help
Powered by ViewVC 1.1.5