Package erjang

Examples of erjang.EString$SubSequence

193
194
195
196
197
198
199
200
201
202
203
    return eos.getBinaryContent();   
  }

  @BIF
  public static EAtom list_to_existing_atom(EObject obj) {
    EString seq;
    if ((seq = obj.testString()) == null)
      throw ERT.badarg(obj);
   
    return EAtom.existing_atom(seq.stringValue());
  }
View Full Code Here
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
    return EBinary.make(bin);
  }

  @BIF
  public static EInteger list_to_integer(EObject obj, EObject radix) {
    EString seq;
    ESmall rdx;
    if ((seq = obj.testString()) == null
        || ((rdx = radix.testSmall()) == null))
      throw ERT.badarg(obj, radix);

    // remove leading +
    if (!seq.isNil()) {
    if (seq.head().equalsExactly(PLUS_SIGN)) {
        seq = seq.tail().testString();
       
        if (seq == null) {
          throw ERT.badarg(obj);
        }
      }
    }   

    try {
      BigInteger val = new BigInteger(seq.stringValue(), rdx.value);
      return ERT.box(val);
     
    } catch (NumberFormatException e) {
      throw ERT.badarg(obj);
    }
View Full Code Here
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
  }
 
 
  @BIF
  public static EInteger list_to_integer(EObject obj) {
    EString seq;
    if ((seq = obj.testString()) == null)
      throw ERT.badarg(obj);

    // remove leading +
    if (!seq.isNil()) {
      if (seq.head().equalsExactly(PLUS_SIGN)) {
        seq = seq.tail().testString();
       
        if (seq == null) {
          throw ERT.badarg(obj);
        }
      }
    }   

    try {
      BigInteger val = new BigInteger(seq.stringValue());
      return ERT.box(val);
     
    } catch (NumberFormatException e) {
      throw ERT.badarg(obj);
    }
View Full Code Here
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
   
  }

  @BIF
  public static EDouble list_to_float(EObject obj) {
    EString seq;
    if ((seq = obj.testString()) == null)
      throw ERT.badarg(obj);
   
    String string = seq.stringValue();
    if (string.length() == 0
      || string.charAt(0) == '.'
      || string.charAt(string.length()-1) == '.'
      || string.indexOf('.') == -1) {
      throw ERT.badarg(obj);
View Full Code Here
514
515
516
517
518
519
520
  @BIF
  public static EString ref_to_list(EObject obj) {
    ERef ref = obj.testReference();
    if (ref == null)
      throw ERT.badarg(obj);
    return new EString(ref.toString());
  }
View Full Code Here
95
96
97
98
99
100
101
102
103
104
105
            public void ready() throws Pausable {
              if (task.send_binary_data) {
                EBinary out = new EBinary(ob);
                task.output_from_driver(out);
              } else {
                EString str = EString.make(ob);
                task.output_from_driver(str);
              }
            }
           
            @Override
View Full Code Here
143
144
145
146
147
148
149
150
151
152
153
154
155
    return res;
  }
 
  @BIF
  public static EBinary list_to_binary(EObject val) {
    EString es;
    if ((es = val.testString()) != null) {
      return es.asBitString();
    }

    ECons cons = val.testCons();
    if (cons == null) throw ERT.badarg(val);
    List<ByteBuffer> out = new ArrayList<ByteBuffer>();
View Full Code Here
222
223
224
225
226
227
228
229
230
231
232
233
234
    EBinary bin;
    if ((bin=val.testBinary()) != null) {
      return new ESmall(bin.byteSize());
    }
   
    EString str;
    if ((str=val.testString()) != null) {
      return new ESmall(str.length());
    }
   
   
    ECons seq;
    if ((seq = val.testCons()) == null) {
View Full Code Here
365
366
367
368
369
370
371
372
373
  @BIF
  static public EString integer_to_list(EObject obj) {
    EInteger num;
    if ((num = obj.testInteger()) != null) {
      return new EString(num.toString());
    }
    throw ERT.badarg(obj);
  }
View Full Code Here
373
374
375
376
377
378
379
380
381
382
383
  }

  @BIF
 
  static public EAtom list_to_atom(EObject obj) {
    EString es;
    if ((es = obj.testString()) != null) {
      return EAtom.intern(es.stringValue());
    }
    throw ERT.badarg(obj);
  }
View Full Code Here
TOP

Related Classes of erjang.EString$SubSequence

  • erjang.beam.CompilerVisitor
  • erjang.driver.FDDriverInstance
  • erjang.m.erlang.ErlBif
  • erjang.m.erlang.ErlConvert
  • erjang.m.erlang.ErlPort
  • erjang.m.erlang.ErlProc
  • erjang.m.os.Native
  • erjang.m.prim_file.Native
  • erjang.m.re.Native
  • erjang.m.re.Native$Options
    • 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.