modelize_property: accepts alternative name for setters

Signed-off-by: Jean Privat <jean@pryen.org>

diff --git a/src/modelize_property.nit b/src/modelize_property.nit
index 8c63151..d40e5ca 100644 (file)
--- a/src/modelize_property.nit
+++ b/src/modelize_property.nit
@@ -709,6 +709,11 @@ redef class AAttrPropdef
                        var writename = name + "="
                        var nwritable = self.n_writable
                        var atwritable = self.get_single_annotation("writable", modelbuilder)
+                       if atwritable != null then
+                               if not atwritable.n_args.is_empty then
+                                       writename = atwritable.arg_as_id(modelbuilder) or else writename
+                               end
+                       end
                        var mwriteprop = modelbuilder.try_get_mproperty_by_name(nid2, mclassdef, writename).as(nullable MMethod)
                        var nwkwredef: nullable Token = null
                        if nwritable != null then nwkwredef = nwritable.n_kwredef