compiler/TMethodDefinitionTests.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Sun, 20 Sep 2015 12:01:42 +0100
changeset 13 97090c2baa33
parent 4 3d80069ea3e2
child 16 17a2d1d9f205
permissions -rw-r--r--
Fixes/refactoring of scopes and bindings. Fixed initialization of scopes and bindings. Make typechecker to seed types.

"{ Package: 'jv:tea/compiler' }"

"{ NameSpace: Smalltalk }"

TestCase subclass:#TMethodDefinitionTests
	instanceVariableNames:''
	classVariableNames:''
	poolDictionaries:''
	category:'Languages-Tea-Compiler-Model-Tests'
!

!TMethodDefinitionTests methodsFor:'tests'!

test_01
    | class method |

    class := TClassDefinition newClass.
    class name: 'iptr'.

    method := TMethodDefinition class: class theMetaclass.
    method source: 'one <^ iptr> ^ 1'.

    self assert: method selector == #one.

    "Created: / 29-08-2015 / 11:39:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !