;ELC ;;; compiled by kwzh@hal.gnu.ai.mit.edu on Tue May 2 20:16:52 1995 ;;; from file /gd/gnu/emacs/19.0/lisp/cdl.el ;;; emacs version 19.28.90.69. ;;; bytecomp version FSF 2.10 ;;; optimization is on. ;;; this file uses opcodes which do not exist in Emacs 18. (if (and (boundp 'emacs-version) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "19"))) (error "`/gd/gnu/emacs/19.0/lisp/cdl.el' was compiled for Emacs 19")) #@68 Run file through ncdump and insert result into buffer after point. (defalias 'cdl-get-file #[(filename) "ÀÁ!ˆ`ÃÄÅÆÅÇ!%ˆ\nbˆ)ÀÉ!‡" [message "ncdump in progress..." start call-process "ncdump" nil t expand-file-name filename "ncdump in progress...done"] 7 (#$ . 475) "fCDF file: "]) #@57 Run region through ncgen and write results into a file. (defalias 'cdl-put-region #[(filename start end) "ÀÁ!ˆÂ \fÅƉ‰ÇÈ !&ˆÀÊ!‡" [message "ncgen in progress..." call-process-region start end "ncgen" nil "-o" expand-file-name filename "ncgen in progress...done"] 10 (#$ . 765) "FNew CDF file: \nr"])