Package erjang

Examples of erjang.EAtom


  }
 
  @BIF
  public static EAtom is_builtin(EObject m, EObject f, EObject a) {
    EAtom mod  = m.testAtom();
    EAtom fun  = f.testAtom();
    ESmall ary = a.testSmall();
   
    if (mod == null || fun == null || ary == null)
      throw ERT.badarg(m, f, a);
   
View Full Code Here


              // already pausable
              if (self.is_pausable)
                break;

              Insn.Bif bi = (Insn.Bif) insn;
              EAtom name = bi.ext_fun.fun;
              SourceOperand[] srcs = bi.args;

              bif = BIFUtil.getMethod("erlang",
                  name.getName(), srcs.length,
                  false, true);
             
              if (bif == null) {
                throw new Error("missing bif: "+bi.ext_fun);
              }
View Full Code Here

  {
    EInternalPort iport;
    EInternalPID ipid;
   
    if ((iport=arg_port.testInternalPort()) == null) {
      EAtom port_name = arg_port.testAtom();
      EObject resolved;
      if (port_name != null
        && (resolved=ERT.whereis(port_name)) != ERT.am_undefined
        && (iport=resolved.testInternalPort()) != null) {
        // ok //
      } else {
        throw ERT.badarg(arg_port, arg_pid);
      }
    }

    if ((ipid=arg_pid.testInternalPID()) == null) {
      EAtom pid_name = arg_pid.testAtom();
      EObject resolved;
      if (pid_name != null
        && (resolved=ERT.whereis(pid_name)) != ERT.am_undefined
        && (ipid=resolved.testInternalPID()) != null) {
        // ok //
View Full Code Here

    ETuple2 name;
    ETuple3 name3;
    if ((name = ETuple2.cast(t)) != null) {

      EAtom am = name.elem2.testAtom();
      EString command = (am == null)
          ? (EString)EString.make(name.elem2)
          : EString.fromString(am.getName());

      if (name.elem1 == am_spawn) {
        EDriver drv = ERT.find_driver(command);

        if (drv == null) {
View Full Code Here

  }
 
  @BIF
  static public EObject port_info(EProc proc, EObject a1, EObject a2) {
    EPort p = a1.testPort();
    EAtom spec = a2.testAtom();
    if (p==null || spec==null) throw ERT.badarg();
    EObject info = p.port_info(spec);
    //log.finer(""+proc.self_handle()+"::port_info ("+a1+") => "+info);
    return info;
  }
View Full Code Here

TOP

Related Classes of erjang.EAtom

Copyright © 2018 www.massapicom. 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.