From c67ed574a7a95db73d9349d58727452850bd47b9 Mon Sep 17 00:00:00 2001 From: Marcos Magueta Date: Sun, 8 Dec 2024 15:00:31 -0300 Subject: planner seq scan assuming ordering of results --- lib/planner.ml | 12 +++++++++++- 1 file changed, 11 insertions(+), 1 deletion(-) (limited to 'lib/planner.ml') diff --git a/lib/planner.ml b/lib/planner.ml index ceaf815..b88090d 100644 --- a/lib/planner.ml +++ b/lib/planner.ml @@ -1,7 +1,17 @@ module Scan = struct open Disk let execute commit locations (entity: string) = - Executor.read commit locations ~filename:entity + let binary = Executor.read commit locations ~filename:("schema~" ^ entity) in + let relation = + Result.map_error (fun _ -> "Failed to deserialize relation from binary format.") + @@ Data_encoding.Binary.of_bytes Schema.Protocol.relation_encoding (Bytes.concat Bytes.empty binary) in + match relation with + | Ok relation -> + begin + let attrs = List.map (fun (a: Schema.Protocol.attribute) -> relation.name ^ "/" ^ a.name) relation.attributes in + Executor.read commit locations ~filename:("schema~" ^ entity) + end + | Error err -> failwith err end module Join = struct -- cgit v1.2.3