blob: 8ed7f6d7a19f66fcadada4225c71b53d1c9858c1 (
about) (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
(define-module (language python module pickle)
#:use-module (language python persist)
#:export (dump dumps load loads name nameDeep))
(define* (dump obj file #:key (protocol #f) (fix_imports #t))
((@@ (persist persistance) dump) obj file))
(define* (dumps obj #:key (protocol #f) (fix_imports #t))
((@@ (persist persistance) dumps) obj))
(define* (load file
#:key (fix_imports #t) (encodeing "ASCII") (errors "strict"))
((@@ (persist persistance) load) file))
(define* (loads s
#:key (fix_imports #t) (encodeing "ASCII") (errors "strict"))
((@@ (persist persistance) loads) s))
(define-syntax-rule (name x) (name-object x))
(define-syntax-rule (nameDeep x) (name-object-deep x))
|