;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (require 'eval-in-repl) #@66 Send expression to *prolog* and have it evaluated. (fn BEG END) (defalias 'eir-send-to-prolog #[514 "\300\"\207" [prolog-consult-region] 5 (#$ . 111)]) #@30 eval-in-repl for SWI Prolog. (defalias 'eir-eval-in-prolog #[0 "`\303\304\305\306#\210\203 \203\307`\310 \"\207\311 \210\312`!\210\313\210`\310 \232\204/\307`\310 \"\210\2021\313\n\2038\314 \207\211b\207" [transient-mark-mode mark-active eir-jump-after-eval eir-repl-start "\\*prolog\\*" run-prolog t eir-send-to-prolog mark beginning-of-line set-mark nil eir-next-code-line] 5 (#$ . 272) nil]) (provide 'eval-in-repl-prolog)