Module:
  {Module}
  'module' canonicalName=QualifiedName
  (elements += XExpressionInsideBlock|elements+=Import)*
;

    def void testParsingAndLinkingWithVars() {
    	val dsl = "
		    module test
            val s1 = 'foo'
            val s2 = 'bar'
            val s3 = s1 + s2
        " 
        parser.parse(dsl).assertNoErrors
        
        val module = parser.parse(dsl)
        val s1 = module.elements.get(0) as XVariableDeclaration
        val s2 = module.elements.get(1) as XVariableDeclaration
        val s3 = module.elements.get(2) as XVariableDeclaration
        
        val evaluationContext = contextProvider.get()
        evaluationContext.newValue(XbaseScopeProvider::THIS, module)
        
        interpreter.evaluate(s1, evaluationContext, CancelIndicator::NullImpl)
        interpreter.evaluate(s2, evaluationContext, CancelIndicator::NullImpl)

        val s1val = evaluationContext.getValue(QualifiedName::create(s1.name))
        val s2val = evaluationContext.getValue(QualifiedName::create(s2.name))

        Assert::assertEquals(s1val, "foo")
        Assert::assertEquals(s2val, "bar")

=>here=>interpreter.evaluate(s3, evaluationContext, CancelIndicator::NullImpl)
        val s3val = evaluationContext.getValue(QualifiedName::create(s3.name))
        Assert::assertEquals(s3val, "foobar")
    }

   	acceptor.accept(module.toClass(module.fullyQualifiedName) [
   	for (element : module.elements) {
   	switch element {
   		XVariableDeclaration: {
		members +=element.toField(element.name, element.getExpressionType)
   		}
   	}}])

	def dispatch getSimpleName(JvmType element) {
	    return "this";
	}

	def dispatch getSimpleName(JvmIdentifiableElement element) {
	    return super.getSimpleName(element);
	}

Module returns xbase::XBlockExpression:
  {Module}
  'module' canonicalName=QualifiedName
  (expressions += XExpressionInsideBlock)*
;