From 81db1bfd580791910646525e30bc45af34533987 Mon Sep 17 00:00:00 2001
From: Sébastien Dailly <sebastien@dailly.me>
Date: Sat, 1 Mar 2025 08:39:02 +0100
Subject: Rewrite the way to handle filters

---
 lib/analysers/printers.ml | 12 ++++++++++++
 1 file changed, 12 insertions(+)
 create mode 100644 lib/analysers/printers.ml

(limited to 'lib/analysers/printers.ml')

diff --git a/lib/analysers/printers.ml b/lib/analysers/printers.ml
new file mode 100644
index 0000000..1c73c13
--- /dev/null
+++ b/lib/analysers/printers.ml
@@ -0,0 +1,12 @@
+module Syntax = ImportConf.Syntax
+module Table = ImportDataTypes.Table
+module Path = ImportDataTypes.Path
+
+let path : conf:Syntax.t -> Format.formatter -> Path.t -> unit =
+ fun ~conf buffer { alias; column } ->
+  let table = ImportConf.get_table_for_name conf alias in
+  Format.fprintf buffer "%s"
+    (Table.print_column table ("col_" ^ string_of_int column))
+
+let prepare_key : f:(Format.formatter -> unit) -> Format.formatter -> unit =
+ fun ~f formatter -> Format.fprintf formatter "rtrim(upper(%t))" f
-- 
cgit v1.2.3