tests/base_call1.nit

   1 # This file is part of NIT ( http://www.nitlanguage.org ).
   2 #
   3 # Copyright 2012 Alexandre Terrasa <alexandre@moz-code.org>
   4 #
   5 # Licensed under the Apache License, Version 2.0 (the "License");
   6 # you may not use this file except in compliance with the License.
   7 # You may obtain a copy of the License at
   8 #
   9 #     http://www.apache.org/licenses/LICENSE-2.0
  10 #
  11 # Unless required by applicable law or agreed to in writing, software
  12 # distributed under the License is distributed on an "AS IS" BASIS,
  13 # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  14 # See the License for the specific language governing permissions and
  15 # limitations under the License.
  16
  17 import base_minimal
  18
  19 class A
  20         var obj: nullable A
  21
  22         init(a: nullable A) do
  23                 self.obj = a
  24         end
  25
  26         fun a1: Bool do
  27                 return self.obj.toto
  28         end
  29
  30         fun toto: Bool do
  31                 return true
  32         end
  33 end
  34
  35 class B
  36         super A
  37
  38         redef fun toto do
  39                 return false
  40         end
  41 end
  42
  43 var a = new A(null)
  44 var b = new B(a)
  45 var c = new B(b)
  46
  47 assert b.a1
  48 assert not c.a1
  49
  50 true.output