##- # Author: Brian Tiffin # Dedicated to the public domain # # Date: September 2016 # Modified: 2016-10-08/18:14-0400 ##+ # # globalnames.icn, generate globalnames # global var, other procedure main() local lv static sv lv := 1 sv := 1 var := 1 every write(globalnames(&main)) end