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

admin

0 @) W% p9 @8 I, w+ ^% a
7 ]/ f- m  V+ f' K$ T( ^做Check Mate功能包常用的几个信息输出打印方法
* {  @/ }! s! }( i2 S
#  Checker function
(Any Uncached) do_check:
1 r* x. ]6 K# J* y* I: y@{
    $tag << XXXXX();
    $log_option << Nth( log_type:, log_type_option: );
0 y7 D% b# \' ^9 d! G( g/ r( I    $log_str << mqc_sprintf ("XXXXXXXXXX: %s", UG_askObjectName(%mqc_askHostpointerOfTag($tag)) );
2 k; T" E# M7 p% x   
    if ($tag > 0) Then
    @{
        ug_PrintValue($log_str);
        mqc_logError( $tag, {}, $log_str );
    }
6 o) v2 J" h2 }5 N# f) T    else
        mqc_log( $log_option, {}, "No active SkeTCh found.");
};