diff options
author | Vivien Kraus <vivien@planete-kraus.eu> | 2021-01-09 11:57:23 +0100 |
---|---|---|
committer | Vivien Kraus <vivien@planete-kraus.eu> | 2021-01-12 10:12:06 +0100 |
commit | 4b6e56ebb435f16374cebf38923393dc2f27f3ce (patch) | |
tree | da0b56006383eb0a41a711c045427010f740842b /ldp/resource/xml.scm |
Initial commit
Diffstat (limited to 'ldp/resource/xml.scm')
-rw-r--r-- | ldp/resource/xml.scm | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/ldp/resource/xml.scm b/ldp/resource/xml.scm new file mode 100644 index 0000000..d6a63c4 --- /dev/null +++ b/ldp/resource/xml.scm @@ -0,0 +1,9 @@ +(define-module (ldp resource xml) + #:use-module (ldp resource sxml) + #:use-module (sxml simple)) + +(define-public (xml->resource string-or-port) + (sxml->resource (xml->sxml string-or-port))) + +(define-public (resource->xml resource . args) + (apply sxml->xml (resource->sxml resource) args)) |