1 29 30 package com.caucho.quercus.expr; 31 32 import com.caucho.quercus.Location; 33 import com.caucho.quercus.env.Env; 34 import com.caucho.quercus.env.Value; 35 import com.caucho.util.L10N; 36 37 40 public class CharAtExpr extends AbstractVarExpr { 41 private static final L10N L = new L10N(CharAtExpr.class); 42 43 protected final Expr _objExpr; 44 protected final Expr _indexExpr; 45 46 public CharAtExpr(Location location, Expr objExpr, Expr indexExpr) 47 { 48 super(location); 49 _objExpr = objExpr; 50 _indexExpr = indexExpr; 51 } 52 53 public CharAtExpr(Expr objExpr, Expr indexExpr) 54 { 55 _objExpr = objExpr; 56 _indexExpr = indexExpr; 57 } 58 59 66 public Value eval(Env env) 67 { 68 Value obj = _objExpr.eval(env); 69 70 return obj.charValueAt(_indexExpr.evalLong(env)); 71 } 72 73 80 public void evalAssign(Env env, Value value) 81 { 82 Value obj = _objExpr.eval(env); 83 84 Value result = obj.setCharValueAt(_indexExpr.evalLong(env), value.toString()); 85 86 _objExpr.evalAssign(env, result); 87 } 88 89 96 public void evalUnset(Env env) 97 { 98 throw new UnsupportedOperationException (); 99 } 100 101 108 public Value evalArg(Env env) 109 { 110 return eval(env); 111 } 112 113 120 public Value evalRef(Env env) 121 { 122 return eval(env); 123 } 124 125 public String toString() 126 { 127 return _objExpr + "{" + _indexExpr + "}"; 128 } 129 } 130 131 | Popular Tags |