blob: 66935d4731faaf4510f2f9cd1c59b652fab9b109 (
plain) (
blame)
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
126
127
128
129
130
131
132
133
134
135
136
137
|
package com.modulus.qbar.core;
import java.util.ArrayList;
import java.util.List;
import com.modulus.qbar.core.interpreter.QBInterpreter;
import com.modulus.qbar.integration.QBWrappedObject;
public class QBStruct extends QBObject{
/**
*
*/
private static final long serialVersionUID = 1271467629591493953L;
private List<QBStruct> superStruct = new ArrayList<QBStruct>();
public static final QBStruct clazz = new QBStruct(){
/**
*
*/
private static final long serialVersionUID = 1915609768305262326L;
@Override
public QBObject newInstance() {
return this;
}
};
public static final QBStruct array = new QBStruct("Array"){
/**
*
*/
private static final long serialVersionUID = -6966880297599366521L;
@Override
public QBObject newInstance() {
return this;
}
};
static{
clazz.name = "Class";
clazz.pack = "core";
clazz.setStruct(clazz);
clazz.setSuper( QBInterpreter.instance().getGlobalNamespace() );
}
private String name;
private String pack;
private QBStruct(){ super(null); init(); };
protected QBStruct(boolean nill) { super(clazz); init(); };
public QBStruct(String name){
super(clazz);
this.name = name;
QBInterpreter.instance().getGlobalNamespace().set(name, this);
init();
}
public QBStruct(String name, QBStruct sup){
super(clazz);
this.name = name;
this.load(sup);
this.superStruct.add(sup);
QBInterpreter.instance().getGlobalNamespace().set(name, this);
init();
}
public String getName(){
return name;
}
public String getPackage(){
return pack;
}
public void setName(String name){
this.name = name;
}
public QBObject newInstance(){
return null;
}
public String toString(){
return name;
}
public void addSuperStruct( QBStruct sup ){
this.superStruct.add(sup);
this.load(sup);
}
private void init(){
this.set("getType", new QBFunction(1) {
private static final long serialVersionUID = -278677571392736723L;
@Override
public QBObject execute(QBObject[] args) {
return this;
}
});
this.set("isa", new QBFunction(2){
private static final long serialVersionUID = 3535644877614653590L;
@Override
public QBObject execute(QBObject[] args) {
QBObject ths = args[1];
QBStruct struct = (QBStruct) args[0];
return QBWrappedObject.wrap( ths.getStruct().instanceOf(struct) );
}
});
}
public boolean instanceOf(QBStruct struct) {
if( this == struct )
return true;
for( QBStruct sup : superStruct )
if( sup.instanceOf(struct) )
return true;
return false;
}
}
|
