diff --git a/t/class-01.err b/t/class-01.err
new file mode 100644
index 0000000..be4ac6b
--- /dev/null
+++ b/t/class-01.err
@@ -0,0 +1,23 @@
+defclass B | x y | {
+
+};
+
+defclass X ::: B | a b | {
+	defun ::* new(t) {
+		| a |
+		set self.a t;
+		set a 100;
+		set self.b (* t 2);
+
+		set self.c (fun(b) {  ##ERROR: unknown class-level variable name
+			printf "xxxx [%d]\n" b;
+		});
+		return self;
+	};
+
+	defun print() {
+		self.c (+ self.a self.b);
+		printf "a=%d b=%d\n" self.a self.b;
+	}
+};
+