File: class-include-nested0.mcl

package info (click to toggle)
mgmt 0.0.26.git.2024.10.25.85e1d6c0e8-4
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 9,364 kB
  • sloc: sh: 2,471; yacc: 1,285; makefile: 543; python: 196; lisp: 77
file content (19 lines) | stat: -rw-r--r-- 419 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
$top = "top-level"
class base($s) {
	test ["middle " + $s,] {}
	$middle = "inside base"
}

# syntactic sugar for the equivalent of defining a class `inner` inside of base.
class base:inner($s) {
	test ["inner " + $s,] {}

	$last = "i am inner and i can see " + $middle
}

include base("world") as b1
include b1.inner("hello") as b2	# inner comes out of `base`

test [$top,] {}
test [$b1.middle,] {}
test [$b2.last,] {}