fixes #5234 (#5240)

1 files changed, 23 insertions, 0 deletions

diff --git a/tests/js/tmangle.nim b/tests/js/tmangle.nim
index 91193d5a7..c4167ba39 100644
--- a/tests/js/tmangle.nim
+++ b/tests/js/tmangle.nim
@@ -3,6 +3,8 @@ discard """
 true
 true
 true
+true
+true
 true'''
 """
 
@@ -64,6 +66,27 @@ block:
     result = result and obj2.`&&`.isNil()
   echo test()
 
+# Test codegen for fields with uppercase letters:
+block:
+  type MyObj = object
+    mField: int
+  proc test(): bool =
+    var a: MyObj
+    var b = a
+    result = b.mField == 0
+  echo test()
+
+# Test tuples
+block:
+  type T = tuple
+    a: int
+    b: int
+  proc test(): bool =
+    var a: T = (a: 1, b: 1)
+    result = a.a == 1
+    result = result and a.b == 1
+  echo test()
+
 # Test importc / exportc fields:
 block:
   type T = object