From 1e25aa365b3eef6b8a52ca115a4f27e37432577a Mon Sep 17 00:00:00 2001
From: Araq <rumpf_a@web.de>
Date: Thu, 6 Jan 2011 23:13:34 +0100
Subject: [PATCH] added test tmultim4.nim

---
 tests/accept/run/spec.csv     |  1 +
 tests/accept/run/tmultim4.nim | 39 +++++++++++++++++++++++++++++++++++
 web/news.txt                  |  1 +
 3 files changed, 41 insertions(+)
 create mode 100644 tests/accept/run/tmultim4.nim

diff --git a/tests/accept/run/spec.csv b/tests/accept/run/spec.csv
index 75e85cd140..377c78a58c 100755
--- a/tests/accept/run/spec.csv
+++ b/tests/accept/run/spec.csv
@@ -41,6 +41,7 @@ tmatrix.nim;111
 tmultim1.nim;7
 tmultim2.nim;collide: unit, thing collide: unit, thing collide: thing, unit
 tmultim3.nim;Hi derived!
+tmultim4.nim;hello
 tnestif.nim;i == 2
 tnestprc.nim;10
 toop1.nim;34[]o 5
diff --git a/tests/accept/run/tmultim4.nim b/tests/accept/run/tmultim4.nim
new file mode 100644
index 0000000000..fbfaf31751
--- /dev/null
+++ b/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
+
+
diff --git a/web/news.txt b/web/news.txt
index eeff6e3191..77b5575583 100755
--- a/web/news.txt
+++ b/web/news.txt
@@ -31,6 +31,7 @@ Additions
 - Pegs support new built-ins: ``\letter``, ``\upper``, ``\lower``,
   ``\title``, ``\white``.
 - Pegs support the new built-in ``\skip`` operation.
+- Source code filters are now properly documented.
 
 
 2010-10-20 Version 0.8.10 released