From 2aac7d838209bbb50f9a7e8709a2f7d2983ef26f Mon Sep 17 00:00:00 2001 From: ygrek Date: Wed, 8 Jul 2009 15:39:20 +0300 Subject: [PATCH] make db instance accessible from sqlgg.all class --- gen_csharp.ml | 2 ++ 1 file changed, 2 insertions(+) diff --git a/gen_csharp.ml b/gen_csharp.ml index 929b650..15183df 100644 --- a/gen_csharp.ml +++ b/gen_csharp.ml @@ -190,9 +190,11 @@ let generate_code index stmt = let generate_all names = start_class "all"; + output "public readonly IDbConnection db;"; List.iter (fun s -> output "public %s %s;" s s) names; empty_line (); G.func "public" "all" ["db","IDbConnection"] (fun () -> + output "this.db = db;"; List.iter (fun name -> output "%s = new %s(db);" name name) names ); end_class "all" -- 2.11.4.GIT