Return to pa_exception.C CVS log

Up to [parser3project] / parser3 / src / main

Annotation of parser3/src/main/pa_exception.C, revision 1.3

1.1       paf         1: /*
1.3     ! paf         2:   $Id: pa_exception.C,v 1.2 2001/01/30 13:07:31 paf Exp $
1.1       paf         3: */
                      4: 
                      5: #include <stdio.h>
                      6: #include <stdlib.h>
                      7: 
                      8: #include "pa_exception.h"
                      9: #include "pa_common.h"
                     10: 
                     11: void Exception::raise(const String *atype, const String *acode,
                     12:                                          const String *aproblem_source, 
                     13:                                          const char *comment_fmt, ...) {
                     14:        ftype=atype;
                     15:        fcode=acode;
                     16:        fproblem_source=aproblem_source;
1.2       paf        17: 
                     18:        if(comment_fmt) {
                     19:                va_list args;
                     20:                va_start(args, comment_fmt);
                     21:                vsnprintf(fcomment, MAX_STRING, comment_fmt, args);
                     22:                va_end(args);
                     23:        } else 
                     24:                fcomment[0]=0;
1.1       paf        25: 
                     26:        longjmp(mark, 1);
                     27: }