diff --git a/R/utils.R b/R/utils.R
new file mode 100644
index 0000000..1334787
--- /dev/null
+++ b/R/utils.R
@@ -0,0 +1,9 @@
+
+util_remove_repeated_empty_lines <- function(.lines) {
+  rle(.lines)$values
+}
+
+utils_write_file <- function(.lines, .output_path) {
+  readr::write_lines(.lines, .output_path)
+  return(invisible(NULL))
+}