Package org.jatha.dynatype

Examples of org.jatha.dynatype.LispString

128
129
130
131
132
133
134
135
136
137
138
139
140
    LispValue   l8 = lisp.makeList(r3, r2, r1);
    show("L8: ", l8);

    // TEST Strings

    LispString  s1 = lisp.makeString("BAZ");
    LispString  s2 = lisp.makeString("bar");
    LispString  s3 = lisp.makeString("foo");

    LispValue   l9 = lisp.makeCons(s3,
            lisp.makeCons(s2,
               lisp.makeCons(s1, lisp.makeList(r3, r2, r1))));
    show("L9: ", l9);
View Full Code Here
1418
1419
1420
1421
1422
1423
1424
1425
1426
1427
1428
1429
1430
1431
1432
1433
1434
1435
1436
1437
1438
1439
    // The symbols come out unsorted, but oh well.

    String matchStr = ((LispString)(str)).getValue().toUpperCase();
    Iterator    iter;
    LispValue   symb;
    LispString  sname;
    String      symbstr;

    while (pkg != NIL)
    {
      iter = ((LispPackage)(pkg.car())).getSymbolTable().values().iterator();

      while (iter.hasNext())
      {
        symb     = ((LispValue)(iter.next()));
        sname    = (LispString)(symb.symbol_name());
        symbstr  = sname.getValue().toUpperCase();

        if (symbstr.indexOf(matchStr) >= 0)
          symb.apropos_print(out);
      }
      pkg = pkg.cdr();
View Full Code Here
347
348
349
350
351
352
353
354
355
356
357
  // sync: call in event thread!
  private void initJatha()
  {
    if( jatha != null ) return;
   
    LispString  symbolName;
 
    jatha          = new AdvancedJatha();
    cilloHash        = jatha.makeHashTable();
    prefsHash        = jatha.makeHashTable();
    symbolName        = jatha.makeString( KEY_PREFERENCES );
View Full Code Here
TOP

Related Classes of org.jatha.dynatype.LispString

  • de.sciss.meloncillo.plugin.LispPlugIn
  • org.jatha.Jatha
  • org.jatha.test.LispTester
    • 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.