diff options
| author | Marc Coquand <marc@mccd.space> | 2024-05-23 13:45:28 -0500 |
|---|---|---|
| committer | Marc Coquand <marc@mccd.space> | 2024-05-23 13:45:28 -0500 |
| commit | eed9e36b661009e5bcf1c4f5ec3a9279bbb7cda5 (patch) | |
| tree | 65940a73db6096bd5f7bcb8d3b9a86f4f28864ab /lib/export.ml | |
| parent | 833716046de9b3ee8e4f277f383967c0d35ba28a (diff) | |
| download | stitch-eed9e36b661009e5bcf1c4f5ec3a9279bbb7cda5.tar.gz stitch-eed9e36b661009e5bcf1c4f5ec3a9279bbb7cda5.tar.bz2 stitch-eed9e36b661009e5bcf1c4f5ec3a9279bbb7cda5.zip | |
Add ability to export current view
Diffstat (limited to 'lib/export.ml')
| -rw-r--r-- | lib/export.ml | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/export.ml b/lib/export.ml new file mode 100644 index 0000000..3346195 --- /dev/null +++ b/lib/export.ml @@ -0,0 +1,4 @@ +let to_path path ~content = + let oc = open_out path in + Printf.fprintf oc "%s" content; + close_out oc |