;ELC ;;; Compiled by rms@psilocin.gnu.org on Sun Mar 8 18:42:28 1998 ;;; from file /gd/gnu/emacs/lisp/cdl.el ;;; in Emacs version 20.2.89.6 ;;; with bytecomp version 2.38 ;;; with all optimizations. ;;; This file uses opcodes which do not exist in Emacs 18. (if (and (boundp 'emacs-version) (< (aref emacs-version (1- (length emacs-version))) ?A) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "19.29"))) (error "`cdl.el' was compiled for Emacs 19.29 or later")) #@68 Run file through ncdump and insert result into buffer after point. (defalias 'cdl-get-file #[(filename) "\302\303!\210`\304\305\306\307\306\310 !%\210b\210)\302\311!\207" [start filename message "ncdump in progress..." call-process "ncdump" nil t expand-file-name "ncdump in progress...done"] 7 (#$ . 521) "fCDF file: "]) #@57 Run region through ncgen and write results into a file. (defalias 'cdl-put-region #[(filename start end) "\303\304!\210\305 \306\307\211\211\310\311\n!&\210\303\312!\207" [start end filename message "ncgen in progress..." call-process-region "ncgen" nil "-o" expand-file-name "ncgen in progress...done"] 10 (#$ . 851) "FNew CDF file: \nr"]) (provide 'cdl)