diff options
| author | Julian Hurst <ark@mansus.space> | 2024-11-15 01:14:07 +0100 |
|---|---|---|
| committer | Julian Hurst <ark@mansus.space> | 2024-11-15 01:14:07 +0100 |
| commit | 4da35965e4ba31cacd90776bffbf36d7f585c645 (patch) | |
| tree | eb834f3d3b71cb38b7aac77c9b12a0e144293839 /tsv | |
| parent | 189c3af4052d543ce816637d97fed926fefa5c47 (diff) | |
| download | hatask-4da35965e4ba31cacd90776bffbf36d7f585c645.tar.gz | |
tsv -> format::tsv and add tests
Diffstat (limited to 'tsv')
| -rw-r--r-- | tsv/tsv.ha | 22 |
1 files changed, 0 insertions, 22 deletions
diff --git a/tsv/tsv.ha b/tsv/tsv.ha deleted file mode 100644 index 85015a1..0000000 --- a/tsv/tsv.ha +++ /dev/null @@ -1,22 +0,0 @@ -use io; -use strings; -use fmt; - -export type error = !(str | io::error); - -export fn writerecord(w: io::handle, record: []str) (void | error) = { - let sep = ""; - for (const field .. record) { - const pfield = strings::replace(field, "\t", ""); - defer free(pfield); - fmt::fprintf(w, "{}{}", sep, pfield)!; - sep = "\t"; - }; - fmt::fprintln(w)!; -}; - -export fn writerecords(w: io::handle, records: [][]str) (void | error) = { - for (const record .. records) { - writerecord(w, record)?; - }; -}; |
