01: /* Soot - a J*va Optimization Framework
02: * Copyright (C) 1999 Patrick Lam
03: *
04: * This library is free software; you can redistribute it and/or
05: * modify it under the terms of the GNU Lesser General Public
06: * License as published by the Free Software Foundation; either
07: * version 2.1 of the License, or (at your option) any later version.
08: *
09: * This library is distributed in the hope that it will be useful,
10: * but WITHOUT ANY WARRANTY; without even the implied warranty of
11: * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12: * Lesser General Public License for more details.
13: *
14: * You should have received a copy of the GNU Lesser General Public
15: * License along with this library; if not, write to the
16: * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
17: * Boston, MA 02111-1307, USA.
18: */
19:
20: /*
21: * Modified by the Sable Research Group and others 1997-1999.
22: * See the 'credits' file distributed with Soot for the complete list of
23: * contributors. (Soot is distributed at http://www.sable.mcgill.ca/soot)
24: */
25:
26: package soot.jimple.internal;
27:
28: import soot.*;
29:
30: import soot.tagkit.*;
31: import soot.jimple.*;
32: import soot.baf.*;
33: import java.util.*;
34:
35: public class JLengthExpr extends AbstractLengthExpr implements
36: ConvertToBaf {
37: public JLengthExpr(Value op) {
38: super (Jimple.v().newImmediateBox(op));
39: }
40:
41: public void convertToBaf(JimpleToBafContext context, List<Unit> out) {
42: ((ConvertToBaf) (getOp())).convertToBaf(context, out);
43:
44: Unit u;
45: out.add(u = Baf.v().newArrayLengthInst());
46:
47: Unit currentUnit = context.getCurrentUnit();
48:
49: Iterator it = currentUnit.getTags().iterator();
50: while (it.hasNext()) {
51: u.addTag((Tag) it.next());
52: }
53: }
54:
55: public Object clone() {
56: return new JLengthExpr(Jimple.cloneIfNecessary(getOp()));
57: }
58:
59: }
|