Annotation of parser3/src/types/pa_vdouble.h, revision 1.20

1.11      paf         1: /** @file
1.16      paf         2:        Parser: @b double parser class decl.
1.11      paf         3: 
1.1       paf         4:        Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com)
1.11      paf         5: 
1.2       paf         6:        Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)
1.1       paf         7: 
1.20    ! paf         8:        $Id: pa_vdouble.h,v 1.19 2001/04/28 15:22:50 paf Exp $
1.1       paf         9: */
                     10: 
                     11: #ifndef PA_VDOUBLE_H
                     12: #define PA_VDOUBLE_H
                     13: 
1.19      paf        14: #include "classes.h"
1.9       paf        15: #include "pa_common.h"
1.5       paf        16: #include "pa_vstateless_object.h"
1.17      paf        17: 
                     18: extern Methoded *double_class;
1.1       paf        19: 
1.11      paf        20: /// value of type 'double'. implemented with @c double
1.4       paf        21: class VDouble : public VStateless_object {
1.1       paf        22: public: // Value
                     23: 
                     24:        const char *type() const { return "double"; }
1.11      paf        25:        /// VDouble: this
1.14      paf        26:        Value *as_expr_result(bool return_string_as_is=false) { return this; }
1.1       paf        27: 
1.11      paf        28:        /// VDouble: fdouble
1.1       paf        29:        const String *get_string() {
1.6       paf        30:                char *buf=(char *)pool().malloc(MAX_NUMBER);
                     31:                snprintf(buf, MAX_NUMBER, "%g", fdouble);
1.8       paf        32:                return NEW String(pool(), buf);
1.1       paf        33:        }
1.11      paf        34:        /// VDouble: fdouble
1.14      paf        35:        double as_double() { return fdouble; }
1.11      paf        36:        /// VDouble: 0 or !0
1.14      paf        37:        bool as_bool() { return fdouble!=0; }
1.10      paf        38: 
                     39: protected: // VAliased
                     40: 
1.13      paf        41:        /// disable .CLASS element. @see VAliased::get_element
1.15      paf        42:        bool hide_class() { return true; }
1.1       paf        43: 
                     44: public: // usage
                     45: 
1.4       paf        46:        VDouble(Pool& apool, double adouble) : VStateless_object(apool, *double_class), 
1.1       paf        47:                fdouble(adouble) {
                     48:        }
                     49: 
                     50:        void inc(double increment) { fdouble+=increment; }
1.7       paf        51:        void mul(double k) { fdouble*=k; }
                     52:        void div(double d) { fdouble/=d; }
                     53:        void mod(int d) { fdouble=((int)fdouble)%d; }
1.1       paf        54: 
                     55: private:
                     56: 
                     57:        double fdouble;
                     58: 
                     59: };
                     60: 
                     61: #endif

E-mail: