X-Git-Url: http://nitlanguage.org diff --git a/tests/base_attr_nullable.nit b/tests/base_attr_nullable.nit new file mode 100644 index 0000000..c8ea25c --- /dev/null +++ b/tests/base_attr_nullable.nit @@ -0,0 +1,84 @@ +# This file is part of NIT ( http://www.nitlanguage.org ). +# +# Copyright 2004-2008 Jean Privat +# +# Licensed under the Apache License, Version 2.0 (the "License"); +# you may not use this file except in compliance with the License. +# You may obtain a copy of the License at +# +# http://www.apache.org/licenses/LICENSE-2.0 +# +# Unless required by applicable law or agreed to in writing, software +# distributed under the License is distributed on an "AS IS" BASIS, +# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. +# See the License for the specific language governing permissions and +# limitations under the License. + +import end + +interface Object +end + +universal Int + meth output is intern + meth +(o: Int): Int is intern +end + +class Integer + readable writable attr _val: Int + init(val: Int) do _val = val + meth output do _val.output +end + +class Foo + attr _a1: Integer + readable attr _a2: Integer + meth run + do + _a1.output + a2.output + end + + meth run_other(o: Foo) + do + o._a1.output + o._a2.output + end + + init + do + #alt1#run + _a1 = new Integer(1) + #alt2#run + _a2 = new Integer(_a1.val + 1) + end + + init nop do end +end + +class Bar +special Foo + attr _a3: Integer + redef meth run + do + _a1.output + _a2.output + _a3.output + end + + init + do + nop + #alt3#run + _a1 = new Integer(10) + #alt4#run_other(self) + _a2 = new Integer(20) + #alt5#run + _a3 = new Integer(30) + end +end + +var f = new Foo +var b = new Bar +f.run +b.run