Package java.lang

Examples of java.lang.Object


  private static ISeq sqExpandList(ISeq seq) {
    PersistentVector ret = PersistentVector.EMPTY;
    for(; seq != null; seq = seq.next())
      {
      Object item = seq.first();
      if(isUnquote(item))
        ret = ret.cons(RT.list(LIST, RT.second(item)));
      else if(isUnquoteSplicing(item))
        ret = ret.cons(RT.second(item));
      else
View Full Code Here


    int ch = read1(r);
    if(ch == -1)
      throw Util.runtimeException("EOF while reading character");
    if(ch == '@')
      {
      Object o = read(r, true, null, true);
      return RT.list(UNQUOTE_SPLICING, o);
      }
    else
      {
      unread(r, ch);
      Object o = read(r, true, null, true);
      return RT.list(UNQUOTE, o);
      }
  }
View Full Code Here

      {
      throw Util.runtimeException("EvalReader not allowed when *read-eval* is false.");
      }

    PushbackReader r = (PushbackReader) reader;
    Object o = read(r, true, null, true);
    if(o instanceof Symbol)
      {
      return RT.classForName(o.toString());
      }
    else if(o instanceof IPersistentList)
      {
      Symbol fs = (Symbol) RT.first(o);
      if(fs.equals(THE_VAR))
        {
        Symbol vs = (Symbol) RT.second(o);
        return RT.var(vs.ns, vs.name)//Compiler.resolve((Symbol) RT.second(o),true);
        }
      if(fs.name.endsWith("."))
        {
        Object[] args = RT.toArray(RT.next(o));
        return Reflector.invokeConstructor(RT.classForName(fs.name.substring(0, fs.name.length() - 1)), args);
        }
      if(Compiler.namesStaticMember(fs))
        {
        Object[] args = RT.toArray(RT.next(o));
        return Reflector.invokeStaticMethod(fs.ns, fs.name, args);
        }
      Object v = Compiler.maybeResolveIn(Compiler.currentNS(), fs);
      if(v instanceof Var)
        {
        return ((IFn) v).applyTo(RT.next(o));
        }
      throw Util.runtimeException("Can't resolve " + fs);
View Full Code Here

        return eofValue;
        }

      if(Character.isDigit(ch))
        {
        Object n = readNumber(r, (char) ch);
        if(RT.suppressRead())
          return null;
        return n;
        }

      IFn macroFn = getMacro(ch);
      if(macroFn != null)
        {
        Object ret = macroFn.invoke(r, (char) ch);
        if(RT.suppressRead())
          return null;
        //no op macros return the reader
        if(ret == r)
          continue;
        return ret;
        }

      if(ch == '+' || ch == '-')
        {
        int ch2 = read1(r);
        if(Character.isDigit(ch2))
          {
          unread(r, ch2);
          Object n = readNumber(r, (char) ch);
          if(RT.suppressRead())
            return null;
          return n;
          }
        unread(r, ch2);
View Full Code Here

      }
    sb.append((char) ch);
    }

  String s = sb.toString();
  Object n = matchNumber(s);
  if(n == null)
    throw new NumberFormatException("Invalid number: " + s);
  return n;
}
View Full Code Here

    }
  else if(s.equals("clojure.core//"))
    {
    return CLOJURE_SLASH;
    }
  Object ret = null;

  ret = matchSymbol(s);
  if(ret != null)
    return ret;
View Full Code Here

      break;

    IFn macroFn = getMacro(ch);
    if(macroFn != null)
      {
      Object mret = macroFn.invoke(r, (char) ch);
      //no op macros return the reader
      if(mret != r)
        a.add(mret);
      }
    else
      {
      unread(r, ch);

      Object o = read(r, true, null, isRecursive);
      if(o != r)
        a.add(o);
      }
    }
View Full Code Here

    XConnection xConn    = xConnector.connect("socket,host=localhost,port=6001");
    if(xConn == null) System.err.println("no XConnection!");

    IBridge iBridge = UnoRuntime.getBridgeByName("java", null, "remote", null, new Object[]{"iiop", xConn, null});

    Object rInitialObject = iBridge.mapInterfaceFrom("classic_uno", XInterface.class);

    if(rInitialObject != null)
    {
      System.err.println("got the remote object");
      System.out.println("before naming service !");
      try
      {
        XNamingService rName = (XNamingService)UnoRuntime.queryInterface(XNamingService.class, rInitialObject );
        try
        {
          if(rName != null)
          {
            System.err.println("got the remote naming service !");
            Object rXsmgr = rName.getRegisteredObject("StarOffice.ServiceManager");
            XMultiServiceFactory rSmgr = (XMultiServiceFactory)UnoRuntime.queryInterface(XMultiServiceFactory.class, rXsmgr);
            if(rSmgr != null)
            {
              System.out.println("got the remote service manager !");
              Object rDriver = rSmgr.createInstance("com.sun.star.sdbc.ADriver");
              if(rDriver != null)
              {
                System.out.println("got a com.sun.star.sdbc.Driver !");
                com.sun.star.sdbc.XDriver  xDriver  = (XDriver)UnoRuntime.queryInterface(com.sun.star.sdbc.XDriver.class,rDriver);
                if(xDriver != null)
View Full Code Here

            new com.sun.star.beans.PropertyValue("user",0,myConfigItems.get("user"),com.sun.star.beans.PropertyState.DIRECT_VALUE),
            new com.sun.star.beans.PropertyValue("password",0,myConfigItems.get("password"),com.sun.star.beans.PropertyState.DIRECT_VALUE)
        };
        try
        {
            Object rConfigProv = myServiceManager.createInstanceWithArguments("com.sun.star.configuration.ConfigurationProvider",ConInfo);                                       
        if(rConfigProv != null)
        {
            myConfigProvider  = (com.sun.star.lang.XMultiServiceFactory)UnoRuntime.queryInterface(com.sun.star.lang.XMultiServiceFactory.class, rConfigProv);                                  
            if (myConfigProvider == null)
            {
View Full Code Here

    try
    {       
        String[] aNodeNames = xNode.getElementNames();                                                    
            for(int i=0; i < aNodeNames.length; i++)
            {
              Object returnNode =  xNode.getByName(aNodeNames[i]);
        if(returnNode instanceof com.sun.star.uno.XInterface)
        {
          //CASE: INNER NODE: calling            
         
          //starttag    
View Full Code Here

TOP

Related Classes of java.lang.Object

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.