# -*- org -*-
+Copyright (C) 2013 Andy Wingo <wingo@pobox.com>
+Copyright (C) 2013 Daniel Hartwig <mandyke@gmail.com>
+
+This document is part of Figl.
+
+Figl is free software; you can redistribute it and/or modify it
+under the terms of the GNU Lesser General Public License as
+published by the Free Software Foundation, either version 3 of the
+License, or (at your option) any later version.
+
+Figl is distributed in the hope that it will be useful, but WITHOUT
+ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General
+Public License for more details.
+
+You should have received a copy of the GNU Lesser General Public
+License along with this document. If not, see
+<http://www.gnu.org/licenses/>.
+
* Completeness
** Complete the high-level GL binding.
+@c This is part of the Figl Reference Manual.
+@c Copyright (c) 2013 Andy Wingo and others
+@c See the file figl.texi for copying conditions.
@c %start of fragment
+@c This is part of the Figl Reference Manual.
+@c Copyright (c) 2013 Andy Wingo and others
+@c See the file figl.texi for copying conditions.
@c %start of fragment
;;; figl -*- mode: scheme; coding: utf-8 -*-
;;; Copyright (C) 2013 Andy Wingo <wingo@pobox.com>
+;;; Copyright (C) 2013 Daniel Hartwig <mandyke@gmail.com>
;;;
;;; Figl is free software: you can redistribute it and/or modify it
;;; under the terms of the GNU Lesser General Public License as
;;; figl -*- mode: scheme; coding: utf-8 -*-
;;; Copyright (C) 2013 Andy Wingo <wingo@pobox.com>
+;;; Copyright (C) 2013 Daniel Hartwig <mandyke@gmail.com>
;;;
;;; Figl is free software: you can redistribute it and/or modify it
;;; under the terms of the GNU Lesser General Public License as
enums))
(define (write-texi mod-name enums port)
+ ;; FIXME: stexi->texi seems to have some issues with multiline
+ ;; comments, otherwise this notice should appear in the fragment
+ ;; itself. Maybe I am not doing it right.
+ (display
+ (string-append
+ "@c This is part of the Figl Reference Manual.\n"
+ "@c Copyright (c) 2013 Andy Wingo and others\n"
+ "@c See the file figl.texi for copying conditions.\n")
+ port)
(display
(stexi->texi
`(*fragment*