QP/C: qte_ctr.c Source File

Go to the documentation of this file.
00001 /*****************************************************************************
00002 * Product: QF/C
00003 * Last Updated for Version: 4.4.00
00004 * Date of the Last Update:  Jan 04, 2012
00005 *
00006 *                    Q u a n t u m     L e a P s
00007 *                    ---------------------------
00008 *                    innovating embedded systems
00009 *
00010 * Copyright (C) 2002-2012 Quantum Leaps, LLC. All rights reserved.
00011 *
00012 * This software may be distributed and modified under the terms of the GNU
00013 * General Public License version 2 (GPL) as published by the Free Software
00014 * Foundation and appearing in the file GPL.TXT included in the packaging of
00015 * this file. Please note that GPL Section 2[b] requires that all works based
00016 * on this software must also be made publicly available under the terms of
00017 * the GPL ("Copyleft").
00018 *
00019 * Alternatively, this software may be distributed and modified under the
00020 * terms of Quantum Leaps commercial licenses, which expressly supersede
00021 * the GPL and are specifically designed for licensees interested in
00022 * retaining the proprietary status of their code.
00023 *
00024 * Contact information:
00025 * Quantum Leaps Web site:  http://www.quantum-leaps.com
00026 * e-mail:                  info@quantum-leaps.com
00027 *****************************************************************************/
00028 #include "qf_pkg.h"
00029 
00036 /*..........................................................................*/
00037 QTimeEvtCtr QTimeEvt_ctr(QTimeEvt const *me) {
00038     QTimeEvtCtr ctr;
00039     QF_CRIT_STAT_
00040     QF_CRIT_ENTRY_();
00041     if (me->prev != (QTimeEvt *)0) {   /* is the time event actually armed? */
00042         ctr = me->ctr;
00043     }
00044     else {                                  /* the time event was not armed */
00045         ctr = (QTimeEvtCtr)0;
00046     }
00047 
00048     QS_BEGIN_NOCRIT_(QS_QF_TIMEEVT_CTR, QS_teObj_, me)
00049         QS_TIME_();                                            /* timestamp */
00050         QS_OBJ_(me);                              /* this time event object */
00051         QS_OBJ_(me->act);                              /* the active object */
00052         QS_TEC_(ctr);                                /* the current counter */
00053         QS_TEC_(me->interval);                              /* the interval */
00054     QS_END_NOCRIT_()
00055 
00056     QF_CRIT_EXIT_();
00057     return ctr;
00058 }