view graal/com.oracle.truffle.ruby.test/src/com/oracle/truffle/ruby/test/language/ModuleTests.java @ 14094:3f27e57439ed

Truffle/Instrumentation: significant rearrangement (including moved class) and extension of the Truffle Instrumentation Framework. New interfaces include DebugContext (which can be attached to the ExecutionContext), through which access is provided to possibly language-specific (a) node instrumentation, (b) debug services manager, (c) notification when programs halt, (d) display of language values, and (e) display of variable identifiers.
author Michael Van De Vanter <michael.van.de.vanter@oracle.com>
date Mon, 03 Feb 2014 20:58:23 -0800
parents 0fbee3eb71f0
children
line wrap: on
line source

/*
 * Copyright (c) 2013 Oracle and/or its affiliates. All rights reserved. This
 * code is released under a tri EPL/GPL/LGPL license. You can use it,
 * redistribute it and/or modify it under the terms of the:
 *
 * Eclipse Public License version 1.0
 * GNU General Public License version 2
 * GNU Lesser General Public License version 2.1
 */
package com.oracle.truffle.ruby.test.language;

import org.junit.*;

import com.oracle.truffle.ruby.test.*;

/**
 * Test {@code module} expressions.
 */
public class ModuleTests extends RubyTests {

    @Test
    public void testDefine() {
        assertPrints("Foo\n", "module Foo; end; puts Foo");
    }

    @Test
    public void testWithConstantDefinition() {
        assertPrints("14\n", "module Foo; FOO=14; end; puts Foo::FOO");
    }

    @Test
    public void testWithConstantDefinitionAndAccessInDeclaration() {
        assertPrints("14\n", "module Foo; FOO=14; puts FOO; end");
    }

    @Test
    public void testCanAccessObjectConstantsInModuleDefinition() {
        assertPrints("", "class Foo; end; module Bar; foo = Foo.new; end");
    }

    @Test
    public void testInclude() {
        assertPrints("14\n", "module Foo; FOO=14; end; module Bar; include Foo; end; puts Bar::FOO");
    }

    @Test
    public void testModuleFunction() {
        assertPrints("1\n", "module Foo; def bar; puts 1; end; module_function :bar; end; Foo::bar");
    }

    @Test
    public void testDistinctModule() {
        assertPrints("true\n", "module A; module X; end; end; module B; module X; end; end; puts A::X.object_id != B::X.object_id");
    }

}