ITclParseTests.java

/*******************************************************************************
 * Copyright (c) 2005, 2007 IBM Corporation and others.
 * All rights reserved. This program and the accompanying materials
 * are made available under the terms of the Eclipse Public License v1.0
 * which accompanies this distribution, and is available at
 * http://www.eclipse.org/legal/epl-v10.html
 *
 
 *******************************************************************************/
package org.eclipse.dltk.itcl.core.tests.internal;

import junit.framework.Test;

import org.eclipse.core.runtime.Path;
import org.eclipse.dltk.ast.declarations.MethodDeclaration;
import org.eclipse.dltk.ast.declarations.ModuleDeclaration;
import org.eclipse.dltk.core.ISourceModule;
import org.eclipse.dltk.core.SourceParserUtil;
import org.eclipse.dltk.core.tests.model.AbstractModelTests;
import org.eclipse.dltk.itcl.core.tests.ITclTestsPlugin;

public class ITclParseTests extends AbstractModelTests {
	public ITclParseTests(String name) {
		super(ITclTestsPlugin.PLUGIN_ID, name);
	}

	public static Test suite() {
		return new Suite(ITclParseTests.class);
	}

	public void testProcArgsABC() throws Exception {
		final String projectName = "project0"; //$NON-NLS-1$
		setUpScriptProject(projectName);
		final String folderName = ""; //$NON-NLS-1$
		final String moduleName = "proc_abc_args.tcl"; //$NON-NLS-1$
		final ISourceModule module = getSourceModule(projectName, folderName,
				new Path(moduleName));
		assertNotNull(module);
		final ModuleDeclaration declaration = SourceParserUtil
				.getModuleDeclaration(module);
		final MethodDeclaration[] children = declaration.getFunctions();
		assertNotNull(children);
		assertEquals(1, children.length);
		final MethodDeclaration proc = children[0];
		assertEquals("fooProc", proc.getName()); //$NON-NLS-1$
		assertEquals(3, proc.getArguments().size());
		deleteProject(projectName);
	}

}