############################################################################ # # File: filehtml.icn # # Subject: Program to create Web page with links to files # # Author: Ralph E. Griswold # # Date: September 17, 1998 # ############################################################################ # # This file is in the public domain. # ############################################################################ # # The files to be includes are listed on the command line. There is no # check that the files actually exist. # ############################################################################ procedure main(args) local file write("") write("File Links") write("") every file := !args do write("", file, "
") write("") end