$ <i>gforth</i>
Gforth 0.7.0, Copyright (C) 1995-2008 Free Software Foundation, Inc.
Gforth comes with ABSOLUTELY NO WARRANTY; for details type `license'
Type `bye' to exit
<i>: f ( separator suffix prefix -- )</i>  compiled
  <i>pad place  2swap 2dup pad +place  pad +place  pad +place</i>  compiled
  <i>pad count ;</i>  ok
<i>s" :" s" Code" s" Rosetta" f cr type</i>
Rosetta::Code ok