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