[lmi-commits] [lmi] odd/test_all_products fccb1ac 1/2: Make 'PolicyForm' assertion a little stringent

[Greg Chicares]

branch: odd/test_all_products
commit fccb1ac4f1a35c43f7989ce30566f86d247799c2
Author: Gregory W. Chicares <gchicares@sbcglobal.net>
Commit: Gregory W. Chicares <gchicares@sbcglobal.net>

    Make 'PolicyForm' assertion a little stringent
    
    'sample2*' policies generally set this variable to "{PolicyForm}",
    but "{PolicyFormAlternative}" is sometimes used instead.
---
 ledger_invariant_init.cpp | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/ledger_invariant_init.cpp b/ledger_invariant_init.cpp
index e8ff420..2721723 100644
--- a/ledger_invariant_init.cpp
+++ b/ledger_invariant_init.cpp
@@ -328,7 +328,10 @@ void LedgerInvariant::Init(BasicValues const* b)
         PolicyForm = p.datum(alt_form ? "PolicyFormAlternative" : 
"PolicyForm");
 
         auto policy_form = b->database().query<int>(DB_PolicyForm);
-        bool const policy_form_is_okay = b->lingo_->lookup(policy_form) == 
PolicyForm;
+        bool const policy_form_is_okay =
+               b->lingo_->lookup(policy_form) == PolicyForm
+            || "{PolicyFormAlternative}" == PolicyForm
+            ;
         if(!policy_form_is_okay)
             alarum()
                 << b->lingo_->lookup(policy_form) << " 
b->lingo_->lookup(policy_form)\n"