Examples of head()


Examples of erjang.ECons.head()

  @BIF
  static public EObject hd(EObject cell) {
    ECons cons;
    if ((cons = cell.testNonEmptyList()) != null) {
      return cons.head();
    }
    throw ERT.badarg(cell);
  }

  @BIF
View Full Code Here

Examples of erjang.ECons.head()

  @BIF(type = Type.GUARD, name = "hd")
  static public EObject hd$p(EObject cell) {
    ECons cons;
    if ((cons = cell.testNonEmptyList()) != null) {
      return cons.head();
    }
    return null;
  }

  @BIF(type = Type.GUARD, name = "tl")
View Full Code Here

Examples of erjang.ECons.head()

      throw ERT.badarg();

    for (; settings != null && !settings.isNil(); settings = settings
        .tail().testCons()) {

      EObject val = settings.head();
      ETuple tup;
      if ((tup = val.testTuple()) != null) {
        ETuple2 tup2;
        if ((tup2 = ETuple2.cast(tup)) != null) {
View Full Code Here

Examples of erjang.ESeq.head()

    case 4:
      self.arg3 = a.head(); a = a.tail();
    case 3:
      self.arg2 = a.head(); a = a.tail();
    case 2:
      self.arg1 = a.head(); a = a.tail();
    case 1:
      self.arg0 = a.head(); // a = a.tail();
    case 0:
    }   
   
View Full Code Here

Examples of erjang.ESeq.head()

    case 3:
      self.arg2 = a.head(); a = a.tail();
    case 2:
      self.arg1 = a.head(); a = a.tail();
    case 1:
      self.arg0 = a.head(); // a = a.tail();
    case 0:
    }   
   
    throw ErjangHibernateException.INSTANCE;
   
View Full Code Here

Examples of erjang.ESeq.head()

        // ok
      } else if ((spec=capture_spec.testSeq()) != null) {
       
        // if it is a sequence, make sure elements are integers
        while (!spec.isNil()) {
          EObject val = spec.head();
          if (val.testSmall() == null && val.testString() == null && val.testAtom() == null)
            return false;
          spec = spec.tail();
        }
       
View Full Code Here

Examples of erjang.ESeq.head()

    boolean link = false;
    boolean monitor = false;
    EAtom priority = null;
   
    for (; !o.isNil(); o = o.tail() ) {
      EObject val = o.head();
     
      ETuple2 t2;
      if (val == am_link) {
        link = true;
      } else if (val == am_monitor) {
View Full Code Here

Examples of erjang.ESeq.head()

    ESeq o = options.testSeq();
   
    if (r==null||o==null)
      throw ERT.badarg(ref, options);

    boolean flush = (!o.isNil() && o.head()==am_flush);

    EObject found = self.demonitor(r);

    if (found == null) {
      return ERT.FALSE;
View Full Code Here

Examples of erjang.ESeq.head()

    a = a.reverse();
    switch (arity) {
    default:
      throw new NotImplemented("hibernate w/" + arity + " args");
    case 7:
      self.arg6 = a.head(); a = a.tail();
    case 6:
      self.arg5 = a.head(); a = a.tail();
    case 5:
      self.arg4 = a.head(); a = a.tail();
    case 4:
View Full Code Here

Examples of erjang.ESeq.head()

    default:
      throw new NotImplemented("hibernate w/" + arity + " args");
    case 7:
      self.arg6 = a.head(); a = a.tail();
    case 6:
      self.arg5 = a.head(); a = a.tail();
    case 5:
      self.arg4 = a.head(); a = a.tail();
    case 4:
      self.arg3 = a.head(); a = a.tail();
    case 3:
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.