|
|
1.1 paf 1: @CLASS
2: bug_derived
3:
4: @USE
5: /_bug.p
6:
7: @BASE
8: bug
9:
1.2 paf 10: @create[param]
1.3 ! paf 11: ^BASE:create[$param]
1.1 paf 12: #$_secret[$param]
13:
1.3 ! paf 14: #@GET_paf[]
! 15: #derived value
1.1 paf 16: #=$_secret=
17:
1.3 ! paf 18: @SET_paf[value]
1.2 paf 19: #^throw[debug;$value]
1.3 ! paf 20: lala
1.1 paf 21: #$_secret[$value]
22: #^throw[debug;$value,$_secret]