add SQLITE3 db_get_integer and simplified version of db_get_string_list

totoro
1 parent ef333ee7
Showing 1 changed file with 28 additions and 0 deletions Show diff stats
database/db_utils.anubis
@@ -224,6 +224,34 @@ public define List(String)
  }.
  
 // sqlite3 API
+public define List(String) 
+  db_get_string_list
+  ( 
+    One -> SQLite3Row      table_cursor
+  ) =
+  if table_cursor(unique) is
+  {
+    error(sql_error)  then logError("DB", db_error(sql_error, "db_get_string_list")); [],
+    no_more_row       then [],    //can't find the symbol in the table, because the row is empty
+    row(explorer)     then 
+      with s = text(explorer)(0),
+      [ s . db_get_string_list(table_cursor)]
+ }.
+ 
+// sqlite3 API
+public define Int
+  db_get_integer
+  ( 
+    One -> SQLite3Row table_cursor
+  ) =
+  if table_cursor(unique) is
+  {
+    error(sql_error)  then logError("DB", db_error(sql_error, "db_get_integer")); 0,
+    no_more_row       then 0,    //can't find the symbol in the table, because the row is empty
+    row(explorer)     then (Int)db_integer(explorer)(0)
+ }.
+
+// sqlite3 API
 public define List(Int) 
   db_get_integer_list
   (