simonpetit/ocaml_sql_parser
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

small comment

Browse Source
This commit is contained in:
simon petit 2025-05-05 15:35:35 +00:00
parent ccd86519ff
commit f6c083ac43
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lib/ast.ml
View File

@ -80,6 +80,8 @@ and sign =
| Times | Times
| Divide | Divide
(* pp = pretty print *)
let rec pp_query fmt ast = let rec pp_query fmt ast =
match ast with match ast with
| Select(cols, table_exp) -> Format.fprintf fmt "%s" (String.cat "SELECT " (pp_columns cols) ^ pp_table_expression table_exp) | Select(cols, table_exp) -> Format.fprintf fmt "%s" (String.cat "SELECT " (pp_columns cols) ^ pp_table_expression table_exp)