Commit d37b5efbc1f3149a1a0b69922e13ff255ef64958

Authored by David RENÉ
1 parent 21ff3407

add find_DB_id from Message with default value

Showing 1 changed file with 14 additions and 0 deletions   Show diff stats
database/db_types.anubis
... ... @@ -62,6 +62,20 @@ public define DB_id
62 62 }
63 63 .
64 64  
  65 +public define DB_id
  66 + find_DB_id
  67 + (
  68 + Message msg,
  69 + String name,
  70 + DB_id default
  71 + )=
  72 + if find_DB_id(msg, name) is
  73 + {
  74 + failure then default,
  75 + success(db_id) then db_id
  76 + }
  77 +.
  78 +
65 79 public define String
66 80 to_String
67 81 (
... ...