Changeset 2188


Ignore:
Timestamp:
Apr 14, 2011, 8:06:40 AM (3 years ago)
Author:
quozl
Message:

stack effect comment for $case example of use

File:
1 edited

Legend:

Unmodified
Added
Removed
  • forth/lib/strcase.fth

    r2183 r2188  
    1010\      " xyz" $of  ." Oh, it's an xyz string"     $endof 
    1111\      ( $ ) ." **** It was " 2dup type 
    12 \   $endcase 
     12\   $endcase ( $ ) 
    1313 
    1414\ The default clause is optional. 
Note: See TracChangeset for help on using the changeset viewer.