Orkuncakilkaya
19fcf60599
ludic migrate state packages <every example program> packages/ludic.lab/example/plate.ludic 1804 vars into 126 states, 64 into lets; 23498 edits in 460 files Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>
22 lines
604 B
Text
22 lines
604 B
Text
# fishing/index.ludic - a private record and a private event, spelt as hunting spells its own
|
|
module fishing
|
|
property Catch {
|
|
fish: int = 0
|
|
}
|
|
event Landed { fish: int }
|
|
export state FishingState {
|
|
landed: int = 0
|
|
last: Catch = null
|
|
}
|
|
@On(Landed) handler Count(fishing_st: mut FishingState) { fishing_st.landed += fish }
|
|
function catch_new(n: int) -> Catch {
|
|
let c = new Catch
|
|
c.fish = n
|
|
return c
|
|
}
|
|
export function fishing_day(fishing_st: mut FishingState) -> int {
|
|
fishing_st.last = catch_new(3)
|
|
emit Landed(fish: fishing_st.last.fish)
|
|
emit Landed(fish: 4)
|
|
return fishing_st.landed
|
|
}
|