From 697ebf098cfff2e446004570bb764796f3326c71 Mon Sep 17 00:00:00 2001
From: Olivier Ramonat <olivier@ramonat.fr>
Date: Sat, 6 Feb 2010 13:26:07 +0100
Subject: [PATCH] CodePeer: result might be uninitialized

---
 src/db-sqlite.adb | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/db-sqlite.adb b/src/db-sqlite.adb
index 84013be..30c206d 100644
--- a/src/db-sqlite.adb
+++ b/src/db-sqlite.adb
@@ -368,6 +368,10 @@ package body DB.SQLite is
 
                --  Increment the reference counter
                DB.Ref_Count := DB.Ref_Count + 1;
+
+            else
+               --  Nothing to do. Return OK
+               Result := 0; -- SQLite_OK
             end if;
 
          else
-- 
2.11.4.GIT