;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\302\303\304\305\306\307\310\311\310\312& \210\313\314\315\316\317DD\320\321\322%\207" [require chess-uci custom-declare-group chess-stockfish nil "The publically available chess engine 'stockfish'." :group chess-engine :link (custom-manual "(chess)Stockfish") (url-link "http://www.stockfishchess.com") custom-declare-variable chess-stockfish-path funcall function #[0 "\300\301!\207" [executable-find "stockfish"] 2] "The path to the stockfish executable." :type file] 10) #@42 Patterns used to match stockfish output. (defvar chess-stockfish-regexp-alist (byte-code "\302\303 \304 \305\260\306BC\"\207" [chess-uci-regexp-alist chess-uci-long-algebraic-regexp append "^info\\s-+.*nps\\s-+\\([0-9]+\\).*pv\\s-+\\(" "\\(\\s-+" "\\)+\\)" #[0 "\302\300!\210\303\304\305!!\302\301!\210\306\304\307!\310\"\211\207" [chess-stockfish-nps chess-stockfish-pv make-local-variable string-to-number match-string 1 split-string 2 " "] 3]] 7) (#$ . 587)) #@30 (fn GAME EVENT &rest ARGS) (defalias 'chess-stockfish-handler #[642 "?\205E\302=\203+\303\302\304#\211\205*\305!\205*\306!\307=\205*\310\311\"\210\211\312\207\313=\203?\314@\315\"\316U\203?\317\320!\210\321\303$\207" [chess-engine-handling-event chess-engine-process initialize chess-uci-handler "stockfish" processp process-status run process-send-string "uci\n" t undo mod 2 1 error "Cannot undo until after stockfish moves" apply] 8 (#$ . 1059)]) (provide 'chess-stockfish)