The stt module implements a stringtable with counted strings. The code is inspired by Wil Badens stringtable.
include ffl/stt.fs
\ Example : the month names 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