Plaster
New
List
Login
text
default
anonymous
2023.02.06 20:03:17
(defmethod shasht:print-json-value ((intent payment-intention) stream) (de:with-quick-accessors (creation-time currency expires metadata quantity service-id status id procurement optional-settings optional-processor-settings completion-information) intent (shasht:with-json-object stream (shasht:print-json-key-value intent "id" id stream) (shasht:print-json-key-value intent "service-id" service-id stream) (shasht:print-json-key-value intent "procurement" procurement stream) (shasht:print-json-key-value intent "creation-time" creation-time stream) (shasht:print-json-key-value intent "currency" (currencies:currency-string currency) stream) (shasht:print-json-key-value intent "expires" expires stream) (shasht:print-json-key-value intent "status" status stream) (shasht:print-json-key-value intent "metadata" metadata stream) (maphash (lambda (key value) (shasht:print-json-key-value intent key value stream)) optional-settings) (maphash (lambda (key value) (shasht:print-json-key-value intent key value stream)) optional-processor-settings) (maphash (lambda (key value) (shasht:print-json-key-value intent key value stream)) completion-information)))) ;;no output from any of the hash tables "{ \"PAYMENT-INTENTION\": { \"id\": \"~jns254gpucqlmth4wwvslcni5iwa3rw7dr8u6bh6jbnjjltm0g8bed808fbbsa4\", \"service-id\": \"!hoi9z9j3bpmnfolzcvytu134uhksdvz0gw959f3bjt6fo1ob3qrvd8126fh0j15\", \"procurement\": [ { \"amount\": { \"n\": 1011, \"d\": 100 } } ], \"creation-time\": 1675713441, \"currency\": \"GBP\", \"expires\": 1675714041, \"status\": { \"STATUS\": \"IDLE\" }, \"metadata\": \"{reee:1}\" }, \"LINKS\": { \"PAY\": \"/v1/service/!hoi9z9j3bpmnfolzcvytu134uhksdvz0gw959f3bjt6fo1ob3qrvd8126fh0j15/pick-processor/~jns254gpucqlmth4wwvslcni5iwa3rw7dr8u6bh6jbnjjltm0g8bed808fbbsa4\" } }"
Raw
Annotate
Repaste
Edit