Package erjang

Examples of erjang.ESeq.cons()

391
392
393
394
395
396
397
398
399
400
401
       
        ETuple candidate = (ETuple) mape.getValue();
        EObject res;
        if ((res = matcher.match(candidate)) != null) {
          count += 1;
          vals = vals.cons(res);
        }
      }
      if (ordered) vals = vals.reverse();

      if (vals == ERT.NIL) {
View Full Code Here
39
40
41
42
43
44
45
46
47
48
    }

  public static ESeq getLoaded() {
    ESeq res = ERT.NIL;
    for (String driver : drivers.keySet()) {
      res = res.cons(EString.fromString(driver));
    }
    return res;
  }
}
View Full Code Here
102
103
104
105
106
107
108
109
110
111
112
    ESeq res = ERT.NIL;
   
    // no need to run in_tx if we're only reading
    EObject val = (EObject) deref().valAt(key);
    if (val != null) {
      return res.cons(val);
    } else {
      return res;
    }
  }
 
View Full Code Here
776
777
778
779
780
781
782
783
784
785
786
  public static ESeq all_ports() {
   
    ESeq res = ERT.NIL;
    for (EDriverTask dt : all_ports.values()) {
      if (dt.isDone()) continue;
      res = res.cons(dt.self_handle());
    }

    return res;
  }
View Full Code Here
486
487
488
489
490
491
492
493
494
495
496
  @BIF
 
  static public ESeq get_module_info(EObject mod) {
    // TODO: get all the attributes from the beam code
    ESeq res = ERT.NIL;
    res = res.cons(new ETuple2(ERT.am_compile,
           get_module_info(mod, ERT.am_compile)));

    res = res.cons(new ETuple2(ERT.am_attributes,
           get_module_info(mod, ERT.am_attributes)));
View Full Code Here
489
490
491
492
493
494
495
496
497
498
499
    // TODO: get all the attributes from the beam code
    ESeq res = ERT.NIL;
    res = res.cons(new ETuple2(ERT.am_compile,
           get_module_info(mod, ERT.am_compile)));

    res = res.cons(new ETuple2(ERT.am_attributes,
           get_module_info(mod, ERT.am_attributes)));

    res = res.cons(new ETuple2(ERT.am_exports,
           get_module_info(mod, ERT.am_exports)));
View Full Code Here
492
493
494
495
496
497
498
499
500
501
502
           get_module_info(mod, ERT.am_compile)));

    res = res.cons(new ETuple2(ERT.am_attributes,
           get_module_info(mod, ERT.am_attributes)));

    res = res.cons(new ETuple2(ERT.am_exports,
           get_module_info(mod, ERT.am_exports)));

    return res;
  }
View Full Code Here
542
543
544
545
546
547
548
549
550
551
552
 
  @BIF
  public static ESeq pre_loaded() {
    ESeq res = ERT.NIL;
    for (int i = 0; i < PRE_LOADED_MODULES.length; i++) {
      res = res.cons(EAtom.intern(PRE_LOADED_MODULES[i]));
    }
    return res;
  }

  @BIF
View Full Code Here
204
205
206
207
208
209
210
211
212
213
214
   
    ESeq rev = ERT.NIL;
    for (; !seq.isNil(); seq = seq.tail()) {
      arg[0] = seq.head();
      EObject val = fun.invoke(proc, arg);
      rev = rev.cons( val );
    }

    return reverse(rev, ERT.NIL);
  }
 
View Full Code Here
237
238
239
240
241
242
243
244
245
246
247
    ESeq l = ERT.NIL;
    int val = sm_e.value;
    int first = sm_s.value;
   
    while (val >= first) {
      l = l.cons(val);
      val -= 1;
    }
   
    return l;
  }
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.