diff options
author | Eric Schulte <schulte.eric@gmail.com> | 2011-09-17 14:52:19 -0600 |
---|---|---|
committer | Eric Schulte <schulte.eric@gmail.com> | 2011-09-17 14:52:29 -0600 |
commit | 1b11c7e6a047b5a24cb700282c367cdd8b9a620a (patch) | |
tree | 9e2246ae88900dbae59818e44bffa7bcf40b0202 | |
parent | 861ecb85baf0467610bb6bbdfa985a2f4adaa795 (diff) | |
download | org-mode-1b11c7e6a047b5a24cb700282c367cdd8b9a620a.tar.gz |
replacing usage of characterp with integerp (which should work w/Emacs22)
* contrib/babel/langs/ob-fortran.el (org-babel-fortran-var-to-fortran):
Replacing usage of characterp with integerp (which should work w/Emacs22).
* lisp/ob-C.el (org-babel-C-var-to-C): Replacing usage of characterp
with integerp (which should work w/Emacs22).
-rw-r--r-- | contrib/babel/langs/ob-fortran.el | 2 | ||||
-rw-r--r-- | lisp/ob-C.el | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/contrib/babel/langs/ob-fortran.el b/contrib/babel/langs/ob-fortran.el index 6b0b144..19d56d2 100644 --- a/contrib/babel/langs/ob-fortran.el +++ b/contrib/babel/langs/ob-fortran.el @@ -139,7 +139,7 @@ of the same value." (format "integer, parameter :: %S = %S\n" var val)) ((floatp val) (format "real, parameter :: %S = %S\n" var val)) - ((or (characterp val)) + ((or (integerp val)) (format "character, parameter :: %S = '%S'\n" var val)) ((stringp val) (format "character(len=%d), parameter :: %S = '%s'\n" diff --git a/lisp/ob-C.el b/lisp/ob-C.el index d0b74f1..dccf6b2 100644 --- a/lisp/ob-C.el +++ b/lisp/ob-C.el @@ -179,7 +179,7 @@ of the same value." (format "int %S = %S;" var val)) ((floatp val) (format "double %S = %S;" var val)) - ((or (characterp val)) + ((or (integerp val)) (format "char %S = '%S';" var val)) ((stringp val) (format "char %S[%d] = \"%s\";" |