/** * This file is part of Erjang - A JVM-based Erlang VM * * Copyright (c) 2009 by Trifork * * 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 erjang.beam; import erjang.EAtom; import erjang.EObject; public class ModuleAdapter implements ModuleVisitor { private final ModuleVisitor mv; /** * */ public ModuleAdapter(ModuleVisitor mv) { this.mv = mv; } public void visitModule(EAtom name) { mv.visitModule(name); } /** list of {Fun,Arity,Entry} */ public void visitExport(EAtom fun, int arity, int entry) { mv.visitExport(fun, arity, entry); } /** list of {Atom,Value} */ public void visitAttribute(EAtom att, EObject value) { mv.visitAttribute(att, value); } /** list of {Atom,Value} */ public void visitCompile(EAtom att, EObject value) { mv.visitCompile(att, value); } @Override public void declareFunction(EAtom fun, int arity, int label) { mv.declareFunction(fun, arity, label); } /** Visit function */ public FunctionVisitor visitFunction(EAtom name, int arity, int startLabel) { return mv.visitFunction(name, arity, startLabel); } public void visitEnd() { mv.visitEnd(); } }