做Check Mate功能包常用的几个信息输出打印方法

admin

) Q$ C* G5 m( [做Check Mate功能包常用的几个信息输出打印方法

#  Checker function
5 L. Y. i! h& L1 k; L( c" ]/ a(Any Uncached) do_check:
7 q, P, A- }/ ]7 {8 k2 s@{
& m+ v! |: A6 I; o    $tag << XXXXX();
    $log_option << Nth( log_type:, log_type_option: );
" i6 {4 B: L4 I# @    $log_str << mqc_sprintf ("XXXXXXXXXX: %s", UG_askObjectName(%mqc_askHostpointerOfTag($tag)) );
# i; m2 q1 Z* i  Y   
    if ($tag > 0) Then
    @{
        ug_PrintValue($log_str);
7 ^& |. z( o* y2 _* Q; k- k' `        mqc_logError( $tag, {}, $log_str );
; ?  E9 }  v& X) _7 I4 x    }
9 e2 Z! l6 Q5 ]+ Z: u3 H, n, x    else
        mqc_log( $log_option, {}, "No active SkeTCh found.");
};