Return to pa_pool.C CVS log

Up to [parser3project] / parser3 / src / main

Annotation of parser3/src/main/pa_pool.C, revision 1.4

1.2       paf         1: /*
1.4     ! paf         2:   $Id: pa_pool.C,v 1.3 2001/01/26 18:34:02 paf Exp $
1.2       paf         3: */
                      4: 
1.1       paf         5: #include <stdlib.h>
                      6: 
                      7: #include "pa_pool.h"
                      8: 
1.4     ! paf         9: Pool::Pool() :
        !            10:        fglobal_exception(0),   
        !            11:        flocal_exception(0) {
1.1       paf        12: }
                     13: 
                     14: Pool::~Pool() {
                     15: }
                     16: 
1.4     ! paf        17: Exception *Pool::set_global_exception(Exception *e) {
        !            18:        Exception *r=fglobal_exception;
        !            19:        fglobal_exception=e;
        !            20:        return r;
        !            21: }
        !            22: void Pool::restore_global_exception(Exception *e) {
        !            23:        fglobal_exception=e;
1.1       paf        24: }
                     25: 
1.4     ! paf        26: Exception *Pool::set_local_exception(Exception *e) {
        !            27:        Exception *r=flocal_exception;
        !            28:        flocal_exception=e;
        !            29:        return r;
        !            30: }
        !            31: void Pool::restore_local_exception(Exception *e) {
        !            32:        flocal_exception=e;
1.1       paf        33: }