Browse files

Fix for bug 1563838 (change error to merror and clarify error message)

  • Loading branch information...
1 parent b2a7319 commit 0159bde194bf634f62f21e51a3ff9806ae773143 willisbl committed Sep 24, 2006
Showing with 1 addition and 1 deletion.
  1. +1 −1 src/matrix.lisp
2 src/matrix.lisp
@@ -678,7 +678,7 @@
(defun $list_matrix_entries (m)
- (or ($matrixp m) (error "not a matrix"))
+ (or ($matrixp m) (merror "The argument to 'list_matrix_entries' must be a matrix"))
(cons (if (null (cdr m)) '(mlist) (caadr m))
(loop for row in (cdr m) append (cdr row))))

0 comments on commit 0159bde

Please sign in to comment.