// Copyright 2012-2013 The Apache Software Foundation
//
// Licensed under the Apache License, Version 2.0 (the "License");
// you may not use this file except in compliance with the License.
// You may obtain a copy of the License at
//
// http://www.apache.org/licenses/LICENSE-2.0
//
// Unless required by applicable law or agreed to in writing, software
// distributed under the License is distributed on an "AS IS" BASIS,
// WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
// See the License for the specific language governing permissions and
// limitations under the License.
package org.apache.tapestry5.clojure.modules;
import clojure.lang.RT;
import clojure.lang.Var;
import org.apache.tapestry5.clojure.ClojureBuilder;
import org.apache.tapestry5.clojure.MethodToFunctionSymbolMapper;
import org.apache.tapestry5.internal.clojure.AnnotationMapper;
import org.apache.tapestry5.internal.clojure.ClojureBuilderImpl;
import org.apache.tapestry5.internal.clojure.DefaultMapper;
import org.apache.tapestry5.ioc.OrderedConfiguration;
import org.apache.tapestry5.ioc.ServiceBinder;
import org.apache.tapestry5.ioc.annotations.Contribute;
import org.apache.tapestry5.ioc.annotations.Startup;
import org.apache.tapestry5.ioc.services.ChainBuilder;
import java.util.List;
public class ClojureModule
{
public static void bind(ServiceBinder binder)
{
binder.bind(ClojureBuilder.class, ClojureBuilderImpl.class);
}
public static MethodToFunctionSymbolMapper buildMethodToFunctionMapper(List<MethodToFunctionSymbolMapper> configuration, ChainBuilder builder)
{
return builder.build(MethodToFunctionSymbolMapper.class, configuration);
}
@Contribute(MethodToFunctionSymbolMapper.class)
public static void defaultMappers(OrderedConfiguration<MethodToFunctionSymbolMapper> configuration)
{
configuration.add("Annotation", new AnnotationMapper());
configuration.add("Default", new DefaultMapper(), "after:*");
}
@Startup
public static void launchClojure() {
Var require = RT.var("clojure.core", "require");
}
}