;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\302\303\304\305\306\307\310\311&\210\312\313\314\315\316DD\317\320\321%\207" [require chess-common custom-declare-group chess-phalanx nil "The publically available chess engine 'phalanx'." :group chess-engine :link (url-link "http://phalanx.sourceforge.net/") custom-declare-variable chess-phalanx-path funcall function #[0 "\300\301!\207" [executable-find "phalanx"] 2] "The path to the phalanx executable." :type file] 8) (defvar chess-phalanx-regexp-alist (byte-code "\301\302Q\303B\304\305BD\207" [chess-algebraic-regexp "my move is P?\\(" "\\)\\s-*$" #[0 "\301\302\303!\304\305\306\307!#\206\310\307\311\"\266\202\"\207" [chess-engine-response-handler move match-string 1 t chess-algebraic-to-ply chess-engine-position nil chess-engine-command illegal] 8] "Illegal move:\\s-*\\(.*\\)" #[0 "\300\301\302!!\207" [error match-string 1] 3]] 3)) #@30 (fn GAME EVENT &rest ARGS) (defalias 'chess-phalanx-handler #[642 "?\2059\303\267\2023\304\305\306#\211\205,\307!\205,\310!\311=\205,\312\313\"\210\211\314\315\207\316\317\320#\207\321\304$\207" [chess-engine-handling-event chess-engine-process chess-engine-opponent-name #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (initialize 11 resign 45)) chess-common-handler initialize "phalanx" processp process-status run process-send-string "nopost\n" "Phalanx" t chess-game-set-data active nil apply] 8 (#$ . 966)]) (provide 'chess-phalanx)