summaryrefslogtreecommitdiff
path: root/web/funnelAC/fwACsrc/htmlhead.c
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /web/funnelAC/fwACsrc/htmlhead.c
Initial commit
Diffstat (limited to 'web/funnelAC/fwACsrc/htmlhead.c')
-rw-r--r--web/funnelAC/fwACsrc/htmlhead.c112
1 files changed, 112 insertions, 0 deletions
diff --git a/web/funnelAC/fwACsrc/htmlhead.c b/web/funnelAC/fwACsrc/htmlhead.c
new file mode 100644
index 0000000000..1af2e9524f
--- /dev/null
+++ b/web/funnelAC/fwACsrc/htmlhead.c
@@ -0,0 +1,112 @@
+/*##############################################################################
+
+FUNNNELWEB COPYRIGHT
+====================
+FunnelWeb is a literate-programming macro preprocessor.
+
+Copyright (C) 1992 Ross N. Williams.
+
+ Ross N. Williams
+ ross@spam.adelaide.edu.au
+ 16 Lerwick Avenue, Hazelwood Park 5066, Australia.
+
+This program is free software; you can redistribute it and/or modify
+it under the terms of Version 2 of the GNU General Public License as
+published by the Free Software Foundation.
+
+This program is distributed WITHOUT ANY WARRANTY; without even the implied
+warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+See Version 2 of the GNU General Public License for more details.
+
+You should have received a copy of Version 2 of the GNU General Public
+License along with this program. If not, you can FTP the license from
+prep.ai.mit.edu/pub/gnu/COPYING-2 or write to the Free Software
+Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+
+Section 2a of the license requires that all changes to this file be
+recorded prominently in this file. Please record all changes here.
+
+Programmers:
+ RNW Ross N. Williams ross@spam.adelaide.edu.au
+ ABC Anthony B. Coates coates@physics.uq.edu.au
+
+Changes:
+ 07-May-1992 RNW Program prepared for release under GNU GPL V2.
+ 15-Apr-1994 ABC Created this file by modifying `texhead.c'
+
+##############################################################################*/
+
+
+/******************************************************************************/
+/* HTMLHEAD.C */
+/******************************************************************************/
+/* */
+/* HTML HEADER PACKAGE */
+/* ================== */
+/* This package contains a single function that writes the HTML header */
+/* (containing all the Weave macros) to the specified stream. The package */
+/* consists of: */
+/* */
+/* htmlhead.htm - The header file ("source code" for htmlhead.cht). */
+/* htmlhead.cht - Automatically generated C code based on htmlhead.htm. */
+/* htmlhead.h - Exported header file containing function definition. */
+/* htmlhead.c - Contains the function body and the codified header file. */
+/* */
+/* WARNING: THE ONLY FILE THAT SHOULD EVER BE MODIFIED BY HAND IS */
+/* HTMLHEAD.HTM. */
+/* From this can be generated a new version of htmlhead.cht. Here's how: */
+/* 1. Edit htmlhead.htm as desired. */
+/* 2. Fire up the FunnelWeb shell and give the command: */
+/* codify htmlhead.htm htmlhead.cht */
+/* */
+/******************************************************************************/
+
+#include "style.h"
+
+#include "htmlhead.h"
+#include "writfile.h"
+
+/******************************************************************************/
+
+EXPORT void html_head(p_wf)
+p_wf_t p_wf;
+/* Writes the FunnelWeb HTML header block to the argument stream. */
+{
+
+ /*#############################################################################
+ IMPORTANT COPYRIGHT NOTICE
+ --------------------------
+ The set of FunnelWeb HTML definitions, embodied in C code in the file
+ included by the #include directive below, is a public domain work.
+
+ Notwithstanding the fact that the public domain set of FunnelWeb HTML
+ definitions is represented in the form of strings in C code #included by the
+ FunnelWeb literate-programming preprocessor program released under GNU General
+ Public License Version 2, the set of HTML definitions themselves do not fall
+ under GNU license. Instead, the set of FunnelWeb HTML definitions is classified
+ as a public domain work that is distributed with FunnelWeb as a "separate
+ work". The set of definitions is included as strings in the FunnelWeb code for
+ the sole reason that this organization avoids FunnelWeb having to locate the
+ file at run time. Thus, when FunnelWeb writes the set of HTML definitions to a
+ .htm output file, it is not generating a work based on itself, but is merely
+ copying a public domain file (which it happened to represent in the form of
+ code rather than data) into the output file.
+
+ The motivation for rigorously clarifying the status of the set of
+ FunnelWeb HTML definitions is that it will appear in HTML output files
+ generated by FunnelWeb, and I do not want any output files generated by
+ FunnelWeb to be under any copyright restrictions.
+
+ -- Ross N. Williams, 5:42pm 07-May-1992, Adelaide, Australia.
+ -- A.B.Coates, 5:55pm 15-Apr-1994, Brisbane, Australia.
+
+ #############################################################################*/
+
+#define WX(STR) wf_wl(p_wf,STR)
+
+#include "htmlhead.cht"
+}
+
+/******************************************************************************/
+/* End of HTMLHEAD.C */
+/******************************************************************************/