--- gforth/objexamp.fs	1998/10/07 18:29:38	1.2
+++ gforth/objexamp.fs	1998/10/07 18:58:58	1.3
@@ -155,6 +155,8 @@ z print cr
 z val . cr
 z inc
 z val . cr
+1 z add
+z val . cr
 
 \ test inst-value
 object class