Orkuncakilkaya
70d05bd504
A scoped friend sees those modules' private names and only the exports of every other; a plain friend module still sees everything. Reseed. Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>
12 lines
349 B
Text
12 lines
349 B
Text
# friend_of.ludic — L3: `friend module lab of bank` sees bank's private names and no other module's;
|
|
# a test harness reaches inside exactly what it tests. `friend module lab` alone still sees all.
|
|
#
|
|
# Running it prints: 7 7
|
|
import "bank"
|
|
program FriendOf {
|
|
friend module lab of bank
|
|
entry {
|
|
add(7)
|
|
print(`{balance} {total()}`)
|
|
}
|
|
}
|