1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20 package net.sf.zel.instr.var;
21
22 import net.sf.zel.instr.*;
23 import net.sf.zel.vm.*;
24 import java.util.LinkedList;
25
26
27
28
29
30 public class DECODE extends Instruction
31 {
32 private static final long serialVersionUID = 625079099199504734L;
33
34 private DECODE(){};
35
36 public final void execute(ExecutionContext context)
37 {
38 Object param = null;
39 Object result = null;
40
41 LinkedList params = new LinkedList();
42 while (!((param = context.popSyncStackVal()) == EndParamMarker.instance))
43 {
44 params.addFirst(param);
45 }
46 final Object expr = params.get(0);
47 final int paramsLength = params.size();
48 for (int i = 1; i < paramsLength; i += 2)
49 {
50 param = params.get(i);
51 if (i + 1 >= paramsLength)
52 {
53 result = param;
54 break;
55 } else if (expr.equals(param))
56 {
57 result = params.get(i + 1);
58 break;
59 }
60 }
61 context.stack.push(result);
62 context.ip++;
63 }
64
65
66
67 public static final Instruction instance = new DECODE();
68 }