Return to pa_vint.h CVS log

Up to [parser3project] / parser3 / src / types

Annotation of parser3/src/types/pa_vint.h, revision 1.33

1.12      paf         1: /** @file
1.17      paf         2:        Parser: @b int parser class decl.
1.12      paf         3: 
1.30      paf         4:        Copyright (c) 2001, 2002 ArtLebedev Group (http://www.artlebedev.com)
1.31      paf         5:        Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
1.1       paf         6: 
1.33    ! paf         7:        $Id: pa_vint.h,v 1.32 2002/04/09 08:10:37 paf Exp $
1.1       paf         8: */
                      9: 
                     10: #ifndef PA_VINT_H
                     11: #define PA_VINT_H
                     12: 
1.20      paf        13: #include "classes.h"
1.10      paf        14: #include "pa_common.h"
1.5       paf        15: #include "pa_vstateless_object.h"
1.18      paf        16: 
                     17: extern Methoded *int_class;
1.1       paf        18: 
1.12      paf        19: /// value of type 'int'. implemented with @c int
1.4       paf        20: class VInt : public VStateless_object {
1.1       paf        21: public: // Value
                     22: 
                     23:        const char *type() const { return "int"; }
1.25      parser     24:        /// VInt: clone
1.28      parser     25:        Value *as_expr_result(bool ) { return NEW VInt(pool(), finteger); }
1.1       paf        26: 
1.12      paf        27:        /// VInt: finteger
1.1       paf        28:        const String *get_string() {
1.32      paf        29:                char local_buf[MAX_NUMBER];
                     30:                size_t size=snprintf(local_buf, MAX_NUMBER, "%d", finteger);
                     31: 
                     32:                char *pool_buf=(char *)pool().malloc(size);
                     33:                memcpy(pool_buf, local_buf, size);
                     34:                
1.23      parser     35:                String *result=NEW String(pool());
1.24      parser     36:                result->APPEND_CLEAN(
1.33    ! paf        37:                        pool_buf, size/*, 
        !            38:                        name().origin().file, name().origin().line*/,0,0);
1.23      parser     39:                return result;
1.1       paf        40:        }
1.12      paf        41:        /// VInt: finteger
1.26      parser     42:        double as_double() const { return as_int(); }
1.22      parser     43:        /// VInt: finteger
1.26      parser     44:        int as_int() const { return finteger; }
1.12      paf        45:        /// VInt: 0 or !0
1.26      parser     46:        bool as_bool() const { return finteger!=0; }
1.11      paf        47: 
                     48: protected: // VAliased
                     49: 
1.14      paf        50:        /// disable .CLASS element. @see VAliased::get_element
1.16      paf        51:        bool hide_class() { return true; }
1.1       paf        52: 
                     53: public: // usage
                     54: 
1.4       paf        55:        VInt(Pool& apool, int ainteger) : VStateless_object(apool, *int_class), 
1.1       paf        56:                finteger(ainteger) {
                     57:        }
                     58: 
                     59:        int get_int() { return finteger; }
1.8       paf        60:        void set_int(int ainteger) { finteger=ainteger; }
1.1       paf        61: 
1.8       paf        62:        void inc(int increment) { finteger+=increment; }
                     63:        void mul(double k) { finteger=(int)(finteger*k); }
                     64:        void div(double d) { finteger=(int)(finteger/d); }
                     65:        void mod(int d) { finteger%=d; }
1.1       paf        66: 
                     67: private:
                     68: 
                     69:        int finteger;
                     70: 
                     71: };
                     72: 
                     73: #endif