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

admin

, N2 H& c, K% ?3 s7 q
做Check Mate功能包常用的几个信息输出打印方法

: F5 ]/ d# b; Y: W+ R#  Checker function
4 G) L. a$ q; ^# V3 f5 t(Any Uncached) do_check:
@{
    $tag << XXXXX();
2 I5 N. t- N& L: F    $log_option << Nth( log_type:, log_type_option: );
5 c( _) K  F% ]4 x4 N' e    $log_str << mqc_sprintf ("XXXXXXXXXX: %s", UG_askObjectName(%mqc_askHostpointerOfTag($tag)) );
   
1 E( k+ L' o, u" P. e    if ($tag > 0) Then
6 _' W' k! }0 S$ a3 `" \    @{
        ug_PrintValue($log_str);
/ f9 G# w0 r; ]' q. q5 W        mqc_logError( $tag, {}, $log_str );
    }
    else
$ L! ^) G2 O' S* g3 E# l        mqc_log( $log_option, {}, "No active SkeTCh found.");
: I7 ], m  h# C};
3 C6 p0 a9 ^" i* T