;ELC   
;;; Compiled
;;; in Emacs version 28.0.50
;;; with all optimizations.


(byte-code "\300\301!\210\300\302!\210\303\304\305\306!\"\210\303\307\310\306!\"\210\303\311\307\"\210\312\311\313\314#\210\315\306\316\307#\317\306\320\321\322$\207" [require gh-users gh-repos defalias gh-search-api-p eieio-make-class-predicate gh-search-api gh-search-api--eieio-childp eieio-make-child-predicate gh-search-api-child-p make-obsolete "use (cl-typep ... \\='gh-search-api) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (gh-api-v3) ((repo-cls :allocation :class :initform gh-repos-repo) (user-cls :allocation :class :initform gh-users-user)) nil] 6)
#@52 Create a new object of class type `gh-search-api'.
(defalias 'gh-search-api #[(&rest slots) "\301\302\303#\207" [slots apply make-instance gh-search-api] 4 (#$ . 686)])
(byte-code "\300\301\302\303#\300\207" [function-put gh-search-api compiler-macro gh-search-api--anon-cmacro] 4)
(defalias 'gh-search-api--anon-cmacro #[(whole &rest slots) "@;\204 	\207\302\303\304@	@#	@\305@DABB\"\207" [slots whole macroexp-warn-and-return format "Obsolete name arg %S to constructor %S" identity] 5])
(defalias 'gh-search-method-builder '(macro . #[(method-name uri process-result-function) "\303\304\305\306\307\310\311	D\312BB\313\n\314BBBBB\257\207" [method-name process-result-function uri defmethod ((search-api gh-search-api) query-string &optional page-limit &rest additional-arguments) (unless (and (stringp query-string) (> (length query-string) 1)) (error "a non-empty query string must be provided to github search")) gh-api-authenticated-request search-api apply-partially quote (search-api) "GET" (nil `((q \, query-string) ,@additional-arguments) page-limit)] 10]))
(defalias 'gh-search-process-method-builder '(macro . #[(method-name class-symbol) "\302\303\304\305\306\307\310\311\312	E\313BBF\257\207" [method-name class-symbol defmethod ((search-api gh-search-api) data) (unless (listp data) (error "Did not recieve a list from the search query")) let ((items (assoc 'items data))) (unless items (error "Search query did not return items")) gh-object-list-read oref search-api ((cdr items))] 11]))
(byte-code "\300\301\302\301\303\"\"\210\304\301\303\305\306$\210\300\307\302\307\303\"\"\210\304\307\303\305\310$\210\300\311\302\311\303\"\"\210\304\311\303\305\312$\210\300\313\302\313\303\"\"\210\304\313\303\305\314$\210\315\316!\207" [eieio--defalias gh-process-repo-search-result eieio--defgeneric-init-form nil eieio--defmethod gh-search-api #[(search-api . #1=(data)) "<\204	 \303\304!\210\301\236\211\204 \303\305!\210\306\307\n\310\"	A\")\207" [data items search-api error #2="Did not recieve a list from the search query" #3="Search query did not return items" gh-object-list-read eieio-oref repo-cls] 5] gh-process-user-search-result #[(search-api . #1#) "<\204	 \303\304!\210\301\236\211\204 \303\305!\210\306\307\n\310\"	A\")\207" [data items search-api error #2# #3# gh-object-list-read eieio-oref user-cls] 5] gh-search-repos #[(search-api . #4=(query-string &optional page-limit &rest additional-arguments)) ";\203\f G\304V\204 \305\306!\210\307	\310\311	\"\312\313\314\315B\nB&\207" [query-string search-api additional-arguments page-limit 1 error #5="a non-empty query string must be provided to github search" gh-api-authenticated-request apply-partially gh-process-repo-search-result #6="GET" "/search/repositories" nil q] 8] gh-search-users #[(search-api . #4#) ";\203\f G\304V\204 \305\306!\210\307	\310\311	\"\312\313\314\315B\nB&\207" [query-string search-api additional-arguments page-limit 1 error #5# gh-api-authenticated-request apply-partially gh-process-user-search-result #6# "/search/users" nil q] 8] provide gh-search] 5)