mirror of https://github.com/Chizi123/.emacs.d.git

Chizi123
2018-11-21 e75a20334813452c6912c090d70a0de2c805f94d
commit | author | age
76bbd0 1 ;ELC
C 2 ;;; Compiled
3 ;;; in Emacs version 26.1
4 ;;; with all optimizations.
5
6 ;;; This file uses dynamic docstrings, first added in Emacs 19.29.
7
8 ;;; This file does not contain utf-8 non-ASCII characters,
9 ;;; and so can be loaded in Emacs versions earlier than 23.
10
11 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
12 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
13
14
15 (require 'ob)
16 #@39 Emacs-lisp specific header arguments.
17 (defconst org-babel-header-args:emacs-lisp '((lexical . :any)) (#$ . 422))
18 #@263 Default arguments for evaluating an emacs-lisp source block.
19
20 A value of "yes" or t causes src blocks to be eval'd using
21 lexical scoping.  It can also be an alist mapping symbols to
22 their value.  It is used as the optional LEXICAL argument to
23 `eval', which see.
24 (defvar org-babel-default-header-args:emacs-lisp '((:lexical . "no")) (#$ . 542))
25 #@78 Expand BODY according to PARAMS, return the expanded body.
26
27 (fn BODY PARAMS)
28 (defalias 'org-babel-expand-body:emacs-lisp #[514 "\302!\303\211\211\204\304P\202\305\306\307\310\311##*\207" [print-length print-level org-babel--get-vars nil "\n" format "(let (%s)\n%s\n)" mapconcat #[257 "\300\301\302@\303ADD!\"\207" [format "%S" print quote] 7 "\n\n(fn VAR)"] "\n      "] 9 (#$ . 892)])
29 #@66 Execute a block of emacs-lisp code with Babel.
30
31 (fn BODY PARAMS)
32 (defalias 'org-babel-execute:emacs-lisp #[514 "\302 \303\304\305\306\307!\310\"\311$\216\312\236A\313\236A\314\315\235\203!\316\202\"\317\320\"\"\321\322\323\235\2047\324\235\203>\325\326Q\202?!<\203I\202L\327\235\"\330\235?\205\321\331\235\204\227\332\235\204\227\333\235\204\227\323\235\204\227\324\235\204\227\334\235\204\227\315\235\204\221\335\235\204\221\336\235\204\221\337\235\203\266\340\235\204\266\341\211\331\235\204\247\332\235\203\256\314\342\"\202\262\314\343\"*\202\321\344\345\346\n\236A\347 \236A\"\345\350 \236A\351\f\236A\"#\262\266\204)\207" [print-length print-level current-window-configuration make-byte-code 0 "\301\300!\207" vconcat vector [set-window-configuration] 2 :lexical :result-params format "output" "(with-output-to-string %s\n)" "(progn %s\n)" org-babel-expand-body:emacs-lisp eval read "code" "pp" "(pp " ")" ("yes" "t") "none" "scalar" "verbatim" "html" "file" "raw" "org" "drawer" "table" nil "%S" "%s" org-babel-reassemble-table org-babel-pick-name :colname-names :colnames :rowname-names :rownames] 15 (#$ . 1295)])
33 (byte-code "\300\301\302\"\210\303\304!\207" [org-babel-make-language-alias "elisp" "emacs-lisp" provide ob-emacs-lisp] 3)