ludic/examples/modules/tangle.ludic

14 lines
480 B
Text

# tangle.ludic — the program `ludic deps` is tested on: a and b use each other (the largest cycle is
# 2), both use the leaf c (not counted), and a writes b's global b_count (one cross-module write);
# a_bump writes b_rec through a local (a warning in ludic deps --writes, not counted).
#
# Running it prints: 4
import "tangle/c"
import "tangle/a"
import "tangle/b"
program Tangle {
entry (b_st: mut BState) {
a_bump(b_st)
print(a_run(b_st) + b_st.b_rec.n - 1)
}
}