summaryrefslogtreecommitdiff
path: root/noncore/tools/calc2/main/stdinstructions.h
blob: a5759681f84370108c15c7e76b542cd5ab6395ef (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
/**********************************************************************
** Copyright (C) 2000 Trolltech AS.  All rights reserved.
**
** This file is part of Qtopia Environment.
**
** This file may be distributed and/or modified under the terms of the
** GNU General Public License version 2 as published by the Free Software
** Foundation and appearing in the file LICENSE.GPL included in the
** packaging of this file.
**
** This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
** WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
**
** See http://www.trolltech.com/gpl/ for GPL licensing information.
**
** Contact info@trolltech.com if any conditions of this licensing are
** not clear to you.
**
**********************************************************************/

#ifndef STDINSTRUCTION_H
#define STDINSTRUCTION_H

#include <qpe/qmath.h>
#include "instruction.h"

// Useful instructions for plugin writers
// If you use them, take note of their precedence
class iAdd:public Instruction {
public:
  iAdd ():Instruction (10) { };
  ~iAdd () { };
  Data eval (Data num) {
    Data result;
    switch (rep) {
	case rDouble:
	    result.dbl =  acc.dbl + num.dbl;
	    break;
	default:
	    result.i = acc.i + num.i;
    };
    return result;
  };
};
class iSub:public Instruction {
public:
  iSub ():Instruction (10) { };
  ~iSub () { };
  Data eval (Data num) {
    Data result;
    switch (rep) {
	case rDouble:
	    result.dbl = acc.dbl - num.dbl;
	    break;
	default:
	    result.i = acc.i - num.i;
    };
    return result;
  };
};
class iMul:public Instruction {
public:
  iMul ():Instruction (20) { };
  ~iMul () { };
  Data eval (Data num) {
    Data result;
    switch (rep) {
	case rDouble:
	    result.dbl = acc.dbl * num.dbl;
	    break;
	default:
	    result.i = acc.i * num.i;
    };
    return result;
  };
};
class iDiv:public Instruction {
public:
  iDiv ():Instruction (20) { };
  ~iDiv () { };
  Data eval (Data num) {
    Data result;
    switch (rep) {
	case rDouble:
	    result.dbl = acc.dbl / num.dbl;
	    break;
	default:
	    result.i = acc.i / num.i;
    };
    return result;
  };
};

// Immediate double instructions only
class iSin:public Instruction {
public:
  iSin ():Instruction () { };
  ~iSin () { };
  Data eval (Data num) {
    Data result;
    result.dbl = qSin(num.dbl);
    return result;
  };
};
class iCos:public Instruction {
public:
  iCos ():Instruction () { };
  ~iCos () { };
  Data eval (Data num) {
    Data result;
    result.dbl = qCos(num.dbl);
    return result;
  };
};
class iTan:public Instruction {
public:
  iTan ():Instruction () { };
  ~iTan () {};
  Data eval (Data num) {
    Data result;
    result.dbl = qTan(num.dbl);
    return result;
  };
};
#endif