##-
# Author: Brian Tiffin
# Dedicated to the public domain
#
# Date: August 2016
# Modified: 2016-10-03/22:52-0400
##+
#
# features.icn, Display the optional and non-portable feature set
#
procedure main()
    every write(&features)

    if &features == "POSIX" then
        write("\nPOSIX code supported with this ", &version)

    f := 0
    every function() do f +:= 1
    write(f, " built in functions")
end