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