diff --git a/bugs/bug0166.pp b/bugs/bug0166.pp
new file mode 100644
index 0000000000..a4f0a4a6aa
--- /dev/null
+++ b/bugs/bug0166.pp
@@ -0,0 +1,10 @@
+type
+  punknown=^unknown;
+  
+  t=object
+    procedure p(i:unknown);
+  end;
+
+begin
+end.
+  
\ No newline at end of file
diff --git a/bugs/readme.txt b/bugs/readme.txt
index 91aaf580d2..48fdeed077 100644
--- a/bugs/readme.txt
+++ b/bugs/readme.txt
@@ -220,3 +220,4 @@ bug0161.pp   internal error when trying to create a set with another set as
 bug0162.pp   continue in repeat ... until loop doesn't work correct
 bug0163.pp   missing <= and >= operators for sets.
 bug0165.pp   missing range check code for enumerated types.
+bug0166.pp   forward type used in declaration crashes instead of error