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

admin

/ q$ y- O9 n2 J5 B: r0 N5 x4 H
& H! j4 C' g) ?( i8 P* n做Check Mate功能包常用的几个信息输出打印方法
  i$ ~9 v: V+ A- h# G$ j
/ I( H! ~3 Y* i2 j( ~* z  c: p#  Checker function
: H4 H3 m; h$ C) x  p(Any Uncached) do_check:
@{
# d+ ~0 L/ p) i3 W% Q6 q    $tag << XXXXX();
) t) ^7 p) S1 v4 a) T: G) K. H& g    $log_option << Nth( log_type:, log_type_option: );
* Y7 C' Z6 t' u    $log_str << mqc_sprintf ("XXXXXXXXXX: %s", UG_askObjectName(%mqc_askHostpointerOfTag($tag)) );
   
. t7 B" T9 z# F' B6 w! \- M  `    if ($tag > 0) Then
    @{
: k4 l0 o5 j& V$ `1 q! A( `        ug_PrintValue($log_str);
3 I6 \' ^* Y- y' [% w        mqc_logError( $tag, {}, $log_str );
    }
    else
        mqc_log( $log_option, {}, "No active SkeTCh found.");
/ l' H$ w3 I8 N" K/ r; d" t6 V};
; h, Y# U! |/ Y7 G