|
|
1.1 ! moko 1: @main[] ! 2: ! 3: $o[^object::create[]] ! 4: $o.k2[v2] ! 5: ! 6: display v1: $o.k1 ! 7: display v2 (with default setter): $o.k2 ! 8: display default getter: $o.test ! 9: ! 10: @CLASS ! 11: object ! 12: ! 13: @create[] ! 14: $k1[v1] ! 15: ! 16: @SET_DEFAULT[name;value] ! 17: $self.$name[=$value=] ! 18: ! 19: @GET_DEFAULT[name] ! 20: =$k1=$k3=