NuSMV/code/nusmv/core/compile/type_checking/checkers/CheckerPsl_private.h

Go to the documentation of this file.

/* ---------------------------------------------------------------------------


  This file is part of the ``compile.type_checking.checkers'' package of NuSMV version 2.
  Copyright (C) 2004 by FBK-irst.

  NuSMV version 2 is free software; you can redistribute it and/or
  modify it under the terms of the GNU Lesser General Public
  License as published by the Free Software Foundation; either
  version 2 of the License, or (at your option) any later version.

  NuSMV version 2 is distributed in the hope that it will be useful,
  but WITHOUT ANY WARRANTY; without even the implied warranty of
  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  Lesser General Public License for more details.

  You should have received a copy of the GNU Lesser General Public
  License along with this library; if not, write to the Free Software
  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307  USA.

  For more information on NuSMV see <http://nusmv.fbk.eu>
  or email to <nusmv-users@fbk.eu>.
  Please report bugs to <nusmv-users@fbk.eu>.

  To contact the NuSMV development board, email to <nusmv@fbk.eu>. 

-----------------------------------------------------------------------------*/

#ifndef __NUSMV_CORE_COMPILE_TYPE_CHECKING_CHECKERS_CHECKER_PSL_PRIVATE_H__
#define __NUSMV_CORE_COMPILE_TYPE_CHECKING_CHECKERS_CHECKER_PSL_PRIVATE_H__


#include "nusmv/core/compile/type_checking/checkers/CheckerPsl.h"

#include "nusmv/core/compile/type_checking/checkers/CheckerBase.h"
#include "nusmv/core/compile/type_checking/checkers/CheckerBase_private.h"

#include "nusmv/core/utils/utils.h"



typedef struct CheckerPsl_TAG
{
  /* this MUST stay on the top */
  INHERITS_FROM(CheckerBase);

  /* -------------------------------------------------- */
  /*                  Private members                   */
  /* -------------------------------------------------- */

  /* -------------------------------------------------- */
  /*                  Virtual methods                   */
  /* -------------------------------------------------- */

} CheckerPsl;



#undef _THROW
#define _THROW(exp, ctx)                                                     \
   (NodeWalker_can_handle(NODE_WALKER(self), exp) ?                          \
    CHECKER_BASE(self)->check_expr(self, exp, ctx) :                         \
   type_checker_check_expression(TYPE_CHECKER(NODE_WALKER(self)->master),    \
                                 PslNode_convert_to_node_ptr(exp),           \
                                 PslNode_convert_to_node_ptr(ctx)))


#define _SET_TYPE(expr, type)                                        \
   tc_set_expression_type(TYPE_CHECKER(NODE_WALKER(self)->master),   \
                          PslNode_convert_to_node_ptr(expr), type)


#define _GET_TYPE(expr)                                           \
   tc_lookup_expr_type(TYPE_CHECKER(NODE_WALKER(self)->master),   \
                       PslNode_convert_to_node_ptr(expr))


#define _VIOLATION(viol_id, expr)                                   \
   checker_base_manage_violation(CHECKER_BASE(self), viol_id,       \
                                 PslNode_convert_to_node_ptr(expr))



#define _PRINT_ERROR_MSG(exp, is_error)                                      \
   type_checker_print_error_message(TYPE_CHECKER(NODE_WALKER(self)->master), \
                                 PslNode_convert_to_node_ptr(exp),           \
                                 is_error)



/* ---------------------------------------------------------------------- */
/* Private methods to be used by derivated and friend classes only         */
/* ---------------------------------------------------------------------- */

void checker_psl_init(CheckerPsl_ptr self, const NuSMVEnv_ptr env);

void checker_psl_deinit(CheckerPsl_ptr self);



#endif /* __NUSMV_CORE_COMPILE_TYPE_CHECKING_CHECKERS_CHECKER_PSL_PRIVATE_H__ */

---