| Server IP : 217.160.0.212 / Your IP : 216.73.216.141 Web Server : Apache System : Linux www 6.18.51-i1-ampere #1196 SMP Fri Sep 11 20:43:55 CEST 2026 aarch64 User : sws1073854427 ( 1073854427) PHP Version : 8.4.23 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : /usr/share/emacs/28.2/lisp/net/ |
Upload File : |
;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.
(byte-code "\300\301!\210\300\302!\207" [require cl-lib soap-client] 2)
#@259 Provide a sample value for TYPE, a WSDL type.
A sample value is a LISP value which soap-client.el will accept
for encoding it using TYPE when making SOAP requests.
This is a generic function, depending on TYPE a specific function
will be called.
(fn TYPE)
(defalias 'soap-sample-value #[257 "\300!\301N\211\203
\211!\207\302\303\300!\"\207" [soap-type-of soap-sample-value error "Cannot provide sample value for type %s"] 6 (#$ . 157)])
#@138 Provide a sample value for TYPE, an xs-basic-type.
This is a specialization of `soap-sample-value' for xs-basic-type
objects.
(fn TYPE)
(defalias 'soap-sample-value-for-xs-basic-type #[257 "\301!>\204 \302\303\304D\"\210\211\305H\211\306\267\202( \307\207\310\207\311\207\312\207\313\207\314\207\315\207\307\207\316\317\301!>\204: \302\303\304D\"\210\305H\"\207" [cl-struct-soap-xs-basic-type-tags type-of signal wrong-type-argument soap-xs-basic-type 6 #s(hash-table size 13 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (string 24 anyURI 26 QName 28 dateTime 30 boolean 32 long 34 int 34 integer 34 byte 34 unsignedInt 34 float 36 double 36 base64Binary 38)) "a string" "an URI" "a QName" "a time-value-p or string" "t or nil" 42 3.14 format "%s"] 8 (#$ . 607)])
#@139 Provide a sample value for ELEMENT, a WSDL element.
This is a specialization of `soap-sample-value' for xs-element
objects.
(fn ELEMENT)
(defalias 'soap-sample-value-for-xs-element #[257 "\301!>\204 \302\303\304D\"\210\211\305H\2030 \306\301!>\204% \302\303\304D\"\210\305H!\307\310!!B\207\307\310!!\207" [cl-struct-soap-xs-element-tags type-of signal wrong-type-argument soap-xs-element 1 intern soap-sample-value soap-xs-element-type] 6 (#$ . 1407)])
#@152 Provide a sample value for ATTRIBUTE, a WSDL attribute.
This is a specialization of `soap-sample-value' for
soap-xs-attribute objects.
(fn ATTRIBUTE)
(defalias 'soap-sample-value-for-xs-attribute #[257 "\301!>\204 \302\303\304D\"\210\211\305H\203? \306\301!>\204% \302\303\304D\"\210\305H!\307\301!>\2049 \302\303\304D\"\210\310H!B\207\307\301!>\204O \302\303\304D\"\210\310H!\207" [cl-struct-soap-xs-attribute-tags type-of signal wrong-type-argument soap-xs-attribute 1 intern soap-sample-value 3] 7 (#$ . 1878)])
#@170 Provide a sample value for ATTRIBUTE-GROUP, a WSDL attribute group.
This is a specialization of `soap-sample-value' for
soap-xs-attribute objects.
(fn ATTRIBUTE-GROUP)
(defalias 'soap-sample-value-for-xs-attribute-group #[257 "\302\303!>\204 \304\305\306D\"\210\307H\211\205\202 \211@\303! >\204( \304\305\310D\"\210\211\311H\203a \312\313\303! >\204A \304\305\310D\"\210\311H!\314\303! >\204V \304\305\310D\"\210\315H!B\"\262\202{ \312\314\303! >\204t \304\305\310D\"\210\315H!\"\262A\266\202\202 \207" [cl-struct-soap-xs-attribute-group-tags cl-struct-soap-xs-attribute-tags nil type-of signal wrong-type-argument soap-xs-attribute-group 4 soap-xs-attribute 1 append intern soap-sample-value 3] 12 (#$ . 2417)])
#@153 Provide a sample value for TYPE, a `soap-xs-simple-type'.
This is a specialization of `soap-sample-value' for
`soap-xs-simple-type' objects.
(fn TYPE)
(defalias 'soap-sample-value-for-xs-simple-type #[257 "\303\304\305\306!>\204 \307\310\311D\"\210\312H\"\306! >\204&