소스 검색

more careful check if values are matrices

* lisp/ob-fortran.el (org-babel-fortran-var-to-fortran): More careful
  check if values are matrices.
Eric Schulte 12 년 전
부모
커밋
0508d22bac
1개의 변경된 파일1개의 추가작업 그리고 1개의 파일을 삭제
  1. 1 1
      lisp/ob-fortran.el

+ 1 - 1
lisp/ob-fortran.el

@@ -144,7 +144,7 @@ of the same value."
       (format "character(len=%d), parameter ::  %S = '%s'\n"
               (length val) var val))
      ;; val is a matrix
-     ((and (listp val) (listp (car val)))
+     ((and (listp val) (org-every #'listp val))
       (format "real, parameter :: %S(%d,%d) = transpose( reshape( %s , (/ %d, %d /) ) )\n"
 	      var (length val) (length (car val)) 
 	      (org-babel-fortran-transform-list val)