Return to classes.C CVS log

Up to [parser3project] / parser3 / src / classes

Annotation of parser3/src/classes/classes.C, revision 1.21

1.2       paf         1: /** @file
                      2:        Parser: @b Methoded and Methoded_array classes.
                      3: 
1.21    ! paf         4:        Copyright (c) 2001-2004 ArtLebedev Group (http://www.artlebedev.com)
1.15      paf         5:        Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
1.16      paf         6: */
1.2       paf         7: 
1.21    ! paf         8: static const char * const IDENT_CLASSES_C="$Date: 2003/11/20 16:34:23 $";
1.2       paf         9: 
                     10: #include "classes.h"
                     11: #include "pa_request.h"
                     12: 
                     13: // Methoded
                     14: 
                     15: void Methoded::register_directly_used(Request& r) {
1.19      paf        16:        if(used_directly()) {
1.2       paf        17:                r.classes().put(name(), this);
1.19      paf        18:        }
                     19: 
                     20:        // prevent system classes from modification [calling add_method]
                     21:        // ^process[$string:CLASS]{@method} prohibited from now on...
                     22:        this->lock();
1.2       paf        23: }
                     24: 
                     25: // Methoded_array
                     26: 
                     27: // global variable
                     28: 
1.19      paf        29: Methoded_array& methoded_array() {
                     30:        static Methoded_array* result=0;
                     31:        if(!result)
                     32:                result=new Methoded_array;
                     33: 
                     34:        return *result;
                     35: }
1.2       paf        36: 
                     37: // methods
                     38: 
1.19      paf        39: Methoded_array::Methoded_array() {
1.2       paf        40: #      include "classes.inc"
                     41: }
                     42: 
1.19      paf        43: static void configure_admin_one(Methoded_array::element_type methoded, Request *r) {
                     44:        if(methoded)
                     45:                methoded->configure_admin(*r);
1.2       paf        46: }
1.3       paf        47: void Methoded_array::configure_admin(Request& r) {
                     48:        for_each(configure_admin_one, &r);
                     49: }
                     50: 
1.19      paf        51: static void configure_user_one(Methoded_array::element_type methoded, Request *r) {
                     52:        if(methoded)
                     53:                methoded->configure_user(*r);
1.3       paf        54: }
                     55: void Methoded_array::configure_user(Request& r) {
                     56:        for_each(configure_user_one, &r);
1.2       paf        57: }
                     58: 
1.19      paf        59: static void register_one(Methoded_array::element_type methoded, Request *r) {
                     60:        if(methoded)
                     61:                methoded->register_directly_used(*r);
1.2       paf        62: }
                     63: void Methoded_array::register_directly_used(Request& r) {
                     64:        for_each(register_one, &r);
                     65: }