package sqlgg

  1. Overview
  2. Docs
SQL Guided (code) Generator

Install 

dune-project
 Dependency

ygrek.org Readme Edit opam file Versions (5)

Authors

  1. Y
    ygrek

Maintainers

  1. Y
    ygrek@autistici.org

Sources

sqlgg-20260721.tbz
sha256=40d7699187951dd2f17d885c4f4f04124930bf7dc1119d4cca322c5f0cb42d8e
sha512=e7c90683cddcff3ca0ba9de9e40c2c4c69923ea62e2647f1a70083e42ed00b7cab53f8a14d1a965ee4465966bc02fa75fa7cb42e485beae1a9c26bdc252c3665

doc/src/sqlgg.lib/shared_queries.ml.html

Source file shared_queries.ml

1
2
3
4
5
6
7
8
9
type  t = (string, string * Sql.select_full) Hashtbl.t
let shared_queries: t = Hashtbl.create 15

let add = Hashtbl.add shared_queries

let get name = try Hashtbl.find shared_queries name with Not_found -> 
  failwith @@ Printf.sprintf "Shared query %s not found" name

let mem name = Hashtbl.mem shared_queries name