Module description

stt -- Stringtable module

The stt module implements a stringtable with counted strings. The code is inspired by Wil Badens stringtable.

Stringtable syntax words

begin-stringtable ( "<spaces>name" -- stringtable-sys ; n -- c-addr u )

Start a named stringtable definition; return the nth string

+stt ( c-addr u -- )

Place the string as counted string in the stringtable

+" ( "ccc<quote>" -- )

Parse ccc delimited by double quote and place the string as counted string in the stringtable

+\" ( "ccc<quote>" -- )

Parse ccc with escaped characters delimited by double quote and place the string as counted string in the stringtable

end-stringtable ( stringtable-sys -- )

End the stringtable definition

Examples

\ ==============================================================================
\
\             stt_expl - the stringtable example in the ffl
\
\               Copyright (C) 2007  Dick van Oudheusden
\  
\ This library is free software; you can redistribute it and/or
\ modify it under the terms of the GNU General Public
\ License as published by the Free Software Foundation; either
\ version 2 of the License, or (at your option) any later version.
\
\ This library is distributed in the hope that it will be useful,
\ but WITHOUT ANY WARRANTY; without even the implied warranty of
\ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
\ General Public License for more details.
\
\ You should have received a copy of the GNU General Public
\ License along with this library; if not, write to the Free
\ Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
\
\ ==============================================================================
\ 
\  $Date: 2009-05-20 13:27:22 $ $Revision: 1.2 $
\
\ ==============================================================================

include ffl/stt.fs

\ Example : the names of the months in a stringtable

\ Create the stringtable in the dictionary

begin-stringtable months
+" January"
+" February"
+" March"
+" April"
+" May"
+" June"
+" July"
+" August"
+" September"
+" October"
+" November"
+" December"
end-stringtable

\ Fetch strings from the stringtable

0  months type cr       \ January
11 months type cr       \ December

Generated by fsdocgen 0.1.0