added test tmultim4.nim

tests/accept/run/tmultim4.nim

@@ -0,0 +1,39 @@
+type
+  Test = object of TObject
+
+method doMethod(a: ref TObject) =
+  quit "override"
+
+method doMethod(a: ref Test) =
+  echo "hello"
+
+proc doProc(a: ref Test) =
+  echo "hello"
+
+proc newTest(): ref Test =
+  new(result)
+
+var s:ref Test = newTest()
+
+
+#doesn't work
+for z in 1..4:
+  s.doMethod()
+  break
+ 
+#works
+#for z in 1..4:
+#  s.doProc()
+#  break
+
+#works
+#while true:
+#  s.doMethod()
+#  break
+
+#works
+#while true:
+#  s.doProc()
+#  break
+
+