Examples of Arg


Examples of erjang.beam.Arg

        if (src instanceof ETuple2) {
          ETuple2 tup = (ETuple2) src;
          if (tup.elem1 == X_ATOM) {
            int xreg = tup.elem2.asInt();
            return new Arg(Arg.Kind.X, xreg, current.getx(xreg));
          } else if (tup.elem1 == Y_ATOM) {
            int yreg = tup.elem2.asInt();
            return new Arg(Arg.Kind.Y, current.get_ypos(yreg),
                current.gety(yreg));
          } else if (tup.elem1 == FR_ATOM) {
            int freg = tup.elem2.asInt();
            return new Arg(Arg.Kind.F, freg, Type.DOUBLE_TYPE);
          } else if (tup.elem1 == ATOM_ATOM) {
            return new Arg(tup.elem2, EATOM_TYPE);
          } else if (tup.elem1 == LITERAL_ATOM) {
            return new Arg(tup.elem2);
          } else if (tup.elem1 == STRING_ATOM) {
            return new Arg(tup.elem2);
          } else if (tup.elem1 == INTEGER_ATOM) {
            return new Arg(tup.elem2);
          } else if (tup.elem1 == FLOAT_ATOM) {
            return new Arg(tup.elem2, Type.DOUBLE_TYPE);
          }

        } else if (src == NIL_ATOM) {
          return new Arg(ERT.NIL, ENIL_TYPE);

        }

        return new Arg(src);

        // return null;

      }
View Full Code Here

Examples of erjang.beam.Arg

        throw new Error("Unhandled dest_arg: "+dest.toSymbolic());
      }

      private Arg src_arg(Operands.XReg xreg, TypeMap tm) {
        return new Arg(Kind.X, xreg.nr, tm.getx(xreg.nr));
      }
View Full Code Here

Examples of erjang.beam.Arg

      private Arg src_arg(Operands.XReg xreg, TypeMap tm) {
        return new Arg(Kind.X, xreg.nr, tm.getx(xreg.nr));
      }
      private Arg src_arg(Operands.YReg yreg, TypeMap tm) {
        return new Arg(Kind.Y, tm.get_ypos(yreg.nr), tm.gety(yreg.nr));
      }
View Full Code Here

Examples of erjang.beam.Arg

      private Arg src_arg(Operands.YReg yreg, TypeMap tm) {
        return new Arg(Kind.Y, tm.get_ypos(yreg.nr), tm.gety(yreg.nr));
      }

      private Arg dest_arg(Operands.XReg xreg) {
        return new Arg(Kind.X, xreg.nr);
      }
View Full Code Here

Examples of erjang.beam.Arg

      private Arg dest_arg(Operands.XReg xreg) {
        return new Arg(Kind.X, xreg.nr);
      }
      private Arg dest_arg(Operands.YReg yreg, TypeMap tm) {
        return new Arg(Kind.Y, tm.get_ypos(yreg.nr));
      }
View Full Code Here

Examples of erjang.beam.Arg

      private Arg dest_arg(Operands.YReg yreg, TypeMap tm) {
        return new Arg(Kind.Y, tm.get_ypos(yreg.nr));
      }

      private Arg arg(Operands.FReg freg) {
        return new Arg(Kind.F, freg.nr);
      }
View Full Code Here

Examples of erjang.beam.Arg

      private Arg arg(Operands.FReg freg) {
        return new Arg(Kind.F, freg.nr);
      }
      private Arg arg(Operands.Float flt) {
        return new Arg(flt.literalValue(), Type.DOUBLE_TYPE);
      }
View Full Code Here

Examples of erjang.beam.Arg

      }
      private Arg arg(Operands.Float flt) {
        return new Arg(flt.literalValue(), Type.DOUBLE_TYPE);
      }
      private Arg arg(Operands.Literal lit) {
        return new Arg(lit.literalValue());
      }
View Full Code Here

Examples of erjang.beam.Arg

      private Arg decode_value(EObject src) {

        if (src instanceof ETuple2) {
          ETuple2 tup = (ETuple2) src;
          if (tup.elem1 == ATOM_ATOM) {
            return new Arg(tup.elem2, EATOM_TYPE);
          } else if (tup.elem1 == LITERAL_ATOM) {
            return new Arg(tup.elem2);
          } else if (tup.elem1 == INTEGER_ATOM) {
            return new Arg(tup.elem2);
          } else if (tup.elem1 == FLOAT_ATOM) {
            return new Arg(tup.elem2);
          }

        } else if (src == NIL_ATOM) {
          return new Arg(ERT.NIL, ENIL_TYPE);

        }

        throw new Error("unknown value:" + src);
View Full Code Here

Examples of erjang.beam.Arg

        if (src instanceof ETuple2) {
          ETuple2 tup = (ETuple2) src;
          if (tup.elem1 == X_ATOM) {
            int xreg = tup.elem2.asInt();
            return new Arg(Arg.Kind.X, xreg);
          } else if (tup.elem1 == Y_ATOM) {
            int yreg = tup.elem2.asInt();
            return new Arg(Arg.Kind.Y, current.get_ypos(yreg));
          } else if (tup.elem1 == FR_ATOM) {
            int freg = tup.elem2.asInt();
            return new Arg(Arg.Kind.F, freg);
          }
        }

        throw new Error();
View Full Code Here
TOP
Copyright © 2018 www.massapi.com. All rights reserved.
All source code are property of their respective owners. Java is a trademark of Sun Microsystems, Inc and owned by ORACLE Inc. Contact coftware#gmail.com.