1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19 package net.sf.zel.instr.var;
20
21
22 import java.util.List;
23 import net.sf.zel.instr.Instruction;
24 import net.sf.zel.nr.OperableDouble;
25 import net.sf.zel.nr.OperableNumber;
26 import net.sf.zel.vm.ExecutionContext;
27 import net.sf.zel.vm.ZExecutionException;
28
29
30 public final class SUM extends Instruction
31 {
32
33
34
35
36 public static final Instruction instance = new SUM();
37
38 private static final long serialVersionUID = -2294409140735487983L;
39
40 private SUM(){};
41
42
43
44
45
46
47 public void execute(final ExecutionContext context) throws ZExecutionException
48 {
49 final MatchIterator iterator = new MatchIterator((String) context.popSyncStackVal());
50 context.stack.pop();
51 Adder stuff = new Adder();
52 iterator.iterate(stuff, context.memContext);
53 context.stack.push(stuff.getSum());
54 context.ip++;
55 }
56
57 private static final class Adder implements MatchIterator.DoStuff
58 {
59
60
61
62
63 private transient double sum = 0;
64
65
66
67 private transient double cnt = 0;
68
69 public OperableDouble getSum()
70 {
71 if (cnt == 0)
72 {
73 return null;
74 } else
75 {
76 return new OperableDouble(sum);
77 }
78 }
79
80 public void execute(Object obj, List context)
81 {
82 if (obj instanceof OperableNumber)
83 {
84 sum += ((Number) obj).doubleValue();
85 cnt++;
86 }
87 }
88 }
89 }