home *** CD-ROM | disk | FTP | other *** search
/ Mega Top 1 / os2_top1.zip / os2_top1 / APPS / TEKST / FUNNEL_S / SOURCES / TEXHEAD.C < prev    next >
C/C++ Source or Header  |  1992-05-27  |  5KB  |  109 lines
  1. /*##############################################################################
  2.  
  3. FUNNNELWEB COPYRIGHT
  4. ====================
  5. FunnelWeb is a literate-programming macro preprocessor.
  6.  
  7. Copyright (C) 1992 Ross N. Williams.
  8.  
  9.    Ross N. Williams
  10.    ross@spam.adelaide.edu.au
  11.    16 Lerwick Avenue, Hazelwood Park 5066, Australia.
  12.  
  13. This program is free software; you can redistribute it and/or modify
  14. it under the terms of Version 2 of the GNU General Public License as
  15. published by the Free Software Foundation.
  16.  
  17. This program is distributed WITHOUT ANY WARRANTY; without even the implied
  18. warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  19. See Version 2 of the GNU General Public License for more details.
  20.  
  21. You should have received a copy of Version 2 of the GNU General Public
  22. License along with this program. If not, you can FTP the license from
  23. prep.ai.mit.edu/pub/gnu/COPYING-2 or write to the Free Software
  24. Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  25.  
  26. Section 2a of the license requires that all changes to this file be
  27. recorded prominently in this file. Please record all changes here.
  28.  
  29. Programmers:
  30.    RNW  Ross N. Williams  ross@spam.adelaide.edu.au
  31.  
  32. Changes:
  33.    07-May-1992  RNW  Program prepared for release under GNU GPL V2.
  34.  
  35. ##############################################################################*/
  36.  
  37.  
  38. /******************************************************************************/
  39. /*                                  TEXHEAD.C                                 */
  40. /******************************************************************************/
  41. /*                                                                            */
  42. /* TEX HEADER PACKAGE                                                         */
  43. /* ==================                                                         */
  44. /* This package contains a single function that writes the TeX header         */
  45. /* (containing all the Weave macros) to the specified stream. The package     */
  46. /* consists of:                                                               */
  47. /*                                                                            */
  48. /* texhead.tex - The header file ("source code" for texhead.ctx).             */
  49. /* texhead.ctx - Automatically generated C code based on texhead.tex.         */
  50. /* texhead.h   - Exported header file containing function definition.         */
  51. /* texhead.c   - Contains the function body and the codified header file.     */
  52. /*                                                                            */
  53. /* WARNING: THE ONLY FILE THAT SHOULD EVER BE MODIFIED BY HAND IS TEXHEAD.TEX.*/
  54. /* From this can be generated a new version of texhead.ctx. Here's how:       */
  55. /* 1. Edit texhead.tex as desired.                                            */
  56. /* 2. Fire up the FunnelWeb shell and give the command:                       */
  57. /*    codify texhead.tex texhead.ctx                                          */
  58. /*                                                                            */
  59. /******************************************************************************/
  60.  
  61. #include "style.h"
  62.  
  63. #include "texhead.h"
  64. #include "writfile.h"
  65.  
  66. /******************************************************************************/
  67.  
  68. EXPORT void tex_head(p_wf)
  69. p_wf_t p_wf;
  70. /* Writes the FunnelWeb TeX header block to the argument stream. */
  71. {
  72.  
  73.  /*#############################################################################
  74.  IMPORTANT COPYRIGHT NOTICE
  75.  --------------------------
  76.  The set of FunnelWeb TeX definitions, embodied in C code in the file
  77.  included by the #include directive below, is a public domain work.
  78.  
  79.  Notwithstanding the fact that the public domain set of FunnelWeb TeX
  80.  definitions is represented in the form of strings in C code #included by the
  81.  FunnelWeb literate-programming preprocessor program released under GNU General
  82.  Public License Version 2, the set of TeX definitions themselves do not fall
  83.  under GNU license. Instead, the set of FunnelWeb TeX definitions is classified
  84.  as a public domain work that is distributed with FunnelWeb as a "separate
  85.  work". The set of definitions is included as strings in the FunnelWeb code for
  86.  the sole reason that this organization avoids FunnelWeb having to locate the
  87.  file at run time. Thus, when FunnelWeb writes the set of TeX definitions to a
  88.  .TeX output file, it is not generating a work based on itself, but is merely
  89.  copying a public domain file (which it happened to represent in the form of
  90.  code rather than data) into the output file.
  91.  
  92.  The motivation for rigorously clarifying the status of the set of
  93.  FunnelWeb TeX definitions is that it will appear in TeX output files
  94.  generated by FunnelWeb, and I do not want any output files generated by
  95.  FunnelWeb to be under any copyright restrictions.
  96.  
  97.  -- Ross N. Williams, 5:42pm 07-May-1992, Adelaide, Australia.
  98.  
  99.  #############################################################################*/
  100.  
  101. #define WX(STR) wf_wl(p_wf,STR)
  102.  
  103. #include "texhead.ctx"
  104. }
  105.  
  106. /******************************************************************************/
  107. /*                             End of TEXHEAD.C                               */
  108. /******************************************************************************/
  109.