aa_true (public)

 aa_true affirm_name affirm_expr

Defined in packages/acs-automated-testing/tcl/aa-test-procs.tcl

Tests that affirm_expr is true.

Call this function within a testcase, stub or component.

Parameters:
affirm_name (required)
affirm_expr (required)
Returns:
True if the affirmation passed, false otherwise.
Author:
Peter Harper
Created:
24 July 2001

Testcases:
webtest_example, aa__coverage_proc_coverage, aa__coverage_proc_proc_list_covered
Source code:
    set result [uplevel 1 [list expr $affirm_expr]]
    if {$affirm_expr in {0 1 t f true false}} {
        set expr ""
    } else {
        set expr [subst {"$affirm_expr" }]
    }
    if { $result } {
        aa_log_result "pass" "[aa_indent$affirm_name: $expr true"
        return 1
    } else {
        aa_log_result "fail" "[aa_indent$affirm_name: $expr false"
        return 0
    }
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: