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

admin

' }' }" x2 g% O  m; \0 Y做Check Mate功能包常用的几个信息输出打印方法
/ R# W/ _; c3 z! p# ~' n) I
% ^: S: W( _: V# [4 i# \( H  L) P0 m( t#  Checker function
(Any Uncached) do_check:
@{
- H  s- c* \4 b. c* _4 d' i    $tag << XXXXX();
% J: f. D! Q" @* U/ z0 ?! e# u, d    $log_option << Nth( log_type:, log_type_option: );
# {6 `" [; r# L6 e    $log_str << mqc_sprintf ("XXXXXXXXXX: %s", UG_askObjectName(%mqc_askHostpointerOfTag($tag)) );
# l' ?: N4 @/ O- ~9 ?% U  M5 B1 k   
! i, j0 P( |9 g6 y6 d+ c6 P+ i    if ($tag > 0) Then
    @{
9 Q0 G# d  a8 d% g, k' H        ug_PrintValue($log_str);
        mqc_logError( $tag, {}, $log_str );
    }
" z2 }3 g  g4 [; O7 Z% s    else
# F5 k; G4 D  b: ~/ ^        mqc_log( $log_option, {}, "No active SkeTCh found.");
};

- R! b5 S8 l! N