[gforth] CASE syntax?

[Terrence Brannon]

The documented CASE syntax:
http://www.complang.tuwien.ac.at/forth/gforth/Docs-html/Selection.html#Selection

terminates with

 ( n ) default-code ( n )
     ENDCASE ( )

but I grepped the source tree and
1 - nowhere after default-code is ( n ) seen.
2 - nowhere after ENDCASE is ( ) seen.

The best example I could find in the source tree was:

: address@hidden ( n -- ) \ gforth compile-f-fetch-local
 case
    0        of postpone address@hidden endof
    1 floats of postpone address@hidden endof
   ( otherwise ) dup postpone address@hidden ,
 endcase ;

And clearly there is no ( ) after ENDCASE.

I cant say whether there is ( n ) after default-code because I am
completely confused by this Forth code. It is far too advanced for me
to understand completely.

At any rate, I think a fully fleshed out simple example would be
helpful to Neophyte FORTHers.