;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\300\302!\210\300\303!\210\304\305\306\307\310\311#\312#\207" [require eval-in-repl scheme cmuscheme defalias eir-send-to-scheme apply-partially eir-send-to-repl #[0 "\300\301!\210\302\303!\207" [other-window 1 switch-to-scheme t] 2] comint-send-input "Send expression to *scheme* and have it evaluated."] 6) #@26 eval-in-repl for Scheme. (defalias 'eir-eval-in-scheme #[0 "\300\301\302\303\304$\207" [eir-eval-in-repl-lisp "\\*scheme\\*" run-scheme eir-send-to-scheme "(define "] 5 (#$ . 421) nil]) (provide 'eval-in-repl-scheme)