HardwireGen: Fix properties

Author: CallumDev

src/WattleScript.HardwireGen.Test/SanityTest.cs

@@ -43,4 +43,17 @@ public void CallMethodOnExtra()
         sc.Globals["data"] = new GenericExtra<string>() { Value = "Hello" };
         Assert.AreEqual(1234, sc.DoString("return data.DoThing()").CastToInt());
     }
+
+    [Test]
+    public void Property()
+    {
+        var sc = new Script(CoreModules.None);
+        var p = new WithProperty();
+        sc.Globals["data"] = p;
+        Assert.AreEqual(6, sc.DoString(@"
+        data.Property = 3
+        return data.Property + 3
+        ").CastToInt());
+        Assert.AreEqual(3, p.Property);
+    }
 }

src/WattleScript.HardwireGen.Test/WithProperty.cs

@@ -0,0 +1,9 @@
+using WattleScript.Interpreter;
+
+namespace WattleScript.HardwireGen.Test;
+
+[WattleScriptUserData]
+public class WithProperty
+{
+    public int Property { get; set; }
+}

src/WattleScript.HardwireGen/HardwireInterop.cs

@@ -115,7 +115,7 @@ static void GenerateMethod(TabbedWriter tw, string typeName, HardwireMethod m)
             if (!m.Constructor)
             {
                 tw.Append("self.");
-                tw.Append(m.Name);
+                tw.Append(m.PropertyName?? m.Name);
             }
             else
             {

src/WattleScript.HardwireGen/HardwireModel.cs

@@ -15,7 +15,7 @@ public record struct TypeOrDiagnostic(HardwireType? Type, CachedDiagnostic? Diag
 public record struct HardwireField(string ClassName, string Name, string Type, bool Read, bool Write);
 public record struct HardwireParameter(string Name, string Type, bool IsParams);
 public record struct HardwireOverload(string ClassName, bool ReturnsVoid, EquatableArray<HardwireParameter> Parameters);
-public record struct HardwireMethod(string Name, bool Property,  bool Constructor, EquatableArray<HardwireOverload> Overloads);
+public record struct HardwireMethod(string Name, string? PropertyName, bool Property, bool Constructor, EquatableArray<HardwireOverload> Overloads);
 
 public record struct CachedDiagnostic(int DiagnosticIndex, string Target, string? Target2, CachedLocation? Location);
 

src/WattleScript.HardwireGen/HardwireSourceGenerator.cs

@@ -255,7 +255,7 @@ static HardwireType FromTypeSymbol(INamedTypeSymbol symbol)
                 overloads.Add(new HardwireOverload(clsName, o.ReturnsVoid, new(parameters.ToArray())));
             }
 
-            hardwireMethods.Add(new(m.PropertyName ?? m.Name, m.Property, m.Constructor, new(overloads.ToArray())));
+            hardwireMethods.Add(new(m.Name, m.PropertyName, m.Property, m.Constructor, new(overloads.ToArray())));
         }
 
         foreach (var f in fields.Values)