module/scripts/PROGRAM.scm

   1 ;;; PROGRAM --- Does something
   2
   3 ;;      Copyright (C) 2002, 2006 Free Software Foundation, Inc.
   4 ;;
   5 ;; This program is free software; you can redistribute it and/or
   6 ;; modify it under the terms of the GNU Lesser General Public License
   7 ;; as published by the Free Software Foundation; either version 3, or
   8 ;; (at your option) any later version.
   9 ;;
  10 ;; This program is distributed in the hope that it will be useful,
  11 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  12 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13 ;; Lesser General Public License for more details.
  14 ;;
  15 ;; You should have received a copy of the GNU Lesser General Public
  16 ;; License along with this software; see the file COPYING.LESSER.  If
  17 ;; not, write to the Free Software Foundation, Inc., 51 Franklin
  18 ;; Street, Fifth Floor, Boston, MA 02110-1301 USA
  19
  20 ;;; Author: J.R.Hacker
  21
  22 ;;; Commentary:
  23
  24 ;; Usage: PROGRAM [ARGS]
  25 ;;
  26 ;; PROGRAM does something.
  27 ;;
  28 ;; TODO: Write it!
  29
  30 ;;; Code:
  31
  32 (define-module (scripts PROGRAM)
  33   :export (PROGRAM))
  34
  35 (define (PROGRAM . args)
  36   #t)
  37
  38 (define main PROGRAM)
  39
  40 ;;; PROGRAM ends here