Index: tests/cget.test
===================================================================
diff -u -r6ff35667cb941876d733d755f49a6530fa2fb929 -r77f50f6c6304355d638d5bf6f172d404940447de
--- tests/cget.test	(.../cget.test)	(revision 6ff35667cb941876d733d755f49a6530fa2fb929)
+++ tests/cget.test	(.../cget.test)	(revision 77f50f6c6304355d638d5bf6f172d404940447de)
@@ -126,6 +126,10 @@
 #
 Test case cget-parameter-methods {
   nx::Class create C {
+    :property {foo:alias,method=m0 {1 2 3}}
+    :property {{bar:forward,method=%self m1 a b c %method} bar1}
+    :public method m0 {args} {set :m0 $args; return $args}
+    :public method m1 {args} {set :m1 $args; return $args}
     :create c1
   }
   
@@ -146,14 +150,25 @@
   # object-level lookup
   #
   ? {c1 info lookup parameter list} \
-      "-volatile -noinit -mixin -class -filter __initcmd"
+      "-foo -bar -volatile -noinit -mixin -class -filter __initcmd"
 
+  #
+  # query all properties from base classes
+  #
   ? {c1 cget -volatile} 0
   ? {c1 cget -noinit} ""
   ? {c1 cget -mixin} ""
   ? {c1 cget -class} ::C
   ? {c1 cget -filter} ""
 
+  #
+  # query alias and forward
+  #
+  ? {c1 eval {set :m0}} "{1 2 3}"
+  ? {c1 eval {set :m1}} {a b c bar bar1}
+
+  ? {c1 cget -foo} ""
+  ? {c1 cget -bar} "a b c bar"
 }