OBJECTS.FS Question

I am having a problem running Anton's OBJECTS.FS extensions.  Likely I'm 
doing something simple wrong and hopefully someone can see my error.  I 
am running the ANS compatible version of OBJECTS.FS on Carbon MacForth. 
  The objects.fs file loads just fine and I am able to run the example 
code snippets just fine as well.  For example:

interface
   selector val
   selector inc
   end-interface foo

  object class
   foo implementation
       cell% inst-var n
   m: ( object -- )
      0 n ! ;m
   overrides construct
   m: ( object -- )
       n @[EMAIL PROTECTED]
   ;m
   method val
   m: ( object -- )
       1 n +! ;m
   method inc
   end-class counter

interface
   selector add
   end-interface foobar

counter class
       foobar implementation
   m: ( n object -- )
       0 do
            this inc
       loop
   ;m overrides add
   end-class xcounter


xcounter dict-new constant x

x val .
0 ok
x inc x val .
1 ok

As you can see from the above everything is running just fine at this 
point.  Note that I instantiated the xcounter object named x in the 
dictionary, I think.

If I then make a snapshot image of my Forth system and re-launch that I 
am unable to get my object x to do anything.  Something like 'x val .' 
leaves two large numbers on the stack (they look like addresses).  Same 
for 'x inc' and so on.  Worse, I cannot even reload the above code 
starting with 'interface selector val ...'.  I get compilation errors 
that appear related to the vocabulary system.  The only way I can get 
the object system to work again is to reload everything from the very 
beginning.  Any ideas?

TIA

-Doug