Properties in interfaces

[SamahParticipant]

So, how do I define a property in an interface, but enforce that it must or must not have a setter?  In Monkey-X I could explicitly define one or both, but MX2 has the property bunched into a single block.

Edit: Monkey-X example:

Monkey

Interface Foo Method Prop:Int() Property Method Prop:Void(value:Int) Property End Class Bar Implements Foo Method Prop:Int() Property Return 123 End Method Prop:Void(value:Int) Property ' set something End End Local foobar:Foo = New Bar foobar.Prop = 1 ' all good

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

Interface Foo   Method Prop:Int() Property   Method Prop:Void(value:Int) Property End   Class Bar Implements Foo   Method Prop:Int() Property     Return 123   End     Method Prop:Void(value:Int) Property     ' set something   End End   Local foobar:Foo = New Bar foobar.Prop = 1 ' all good

Monkey 2 example?

Monkey

Interface Foo Property Prop:Int() ' how do i define a setter? End Class Bar Implements Foo Property Prop:Int() Return 123 Setter(value:Int) ' set something End End Local foobar:Foo = New Bar foobar.Prop = 1 ' error, compiler doesn't know that Foo.Prop has a setter

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Interface Foo   Property Prop:Int()   ' how do i define a setter? End   Class Bar Implements Foo   Property Prop:Int()     Return 123   Setter(value:Int)     ' set something   End End   Local foobar:Foo = New Bar foobar.Prop = 1 ' error, compiler doesn't know that Foo.Prop has a setter

 

[Mark SiblyKeymaster]

Just leave out the ‘End’…

Monkey

Interface I Property P:Int() Setter( p:Int ) End

1 2 3 4 5 6

Interface I   Property P:Int() Setter( p:Int )   End

 

[SamahParticipant]

Thanks.  It seems a bit awkward that you need to define an argument to the setter.  Languages like C# and Swift give you an implicit variable called newValue
I wish it had a didSet/ willSet pair too.

[therevillsParticipant]

Leave out the ‘End’…. which ‘End’?

Getter/Setter:

Monkey

#Import "<std>" #Import "<mojo>" Interface Foo Property Prop:Int() Setter( p:Int ) End Class Bar Implements Foo Field value:Int Property Prop:Int() Return value Setter(value:Int) Self.value = value End End Function Main() Local foobar:Foo = New Bar Print("foobar.Prop = " + foobar.Prop) foobar.Prop = 1 Print("foobar.Prop = " + foobar.Prop) End

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24

#Import "<std>" #Import "<mojo>"   Interface Foo Property Prop:Int() Setter( p:Int ) End Class Bar Implements Foo Field value:Int Property Prop:Int() Return value Setter(value:Int) Self.value = value End End   Function Main() Local foobar:Foo = New Bar Print("foobar.Prop = " + foobar.Prop) foobar.Prop = 1 Print("foobar.Prop = " + foobar.Prop) End

Getter Only:

Monkey

#Import "<std>" #Import "<mojo>" Interface Foo Property Prop:Int() End Class Bar Implements Foo Field value:Int Property Prop:Int() Return value End End Function Main() Local foobar:Foo = New Bar Print("foobar.Prop = " + foobar.Prop) End

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

#Import "<std>" #Import "<mojo>"   Interface Foo Property Prop:Int() End Class Bar Implements Foo Field value:Int Property Prop:Int() Return value End End   Function Main() Local foobar:Foo = New Bar Print("foobar.Prop = " + foobar.Prop) End

Did I miss something here?

[SamahParticipant]

@therevills: That’s basically what I wanted.
Edit: Ooohhh putting an @ creates a link to the user’s profile.

[Author]

Posts