guile-snarf-docs.in 1016 B

123456789101112131415161718192021222324252627
  1. #!/bin/sh
  2. # Extract the doc stuff for builtin things.
  3. #
  4. # Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2006 Free Software Foundation, Inc.
  5. #
  6. # This program is free software; you can redistribute it and/or modify
  7. # it under the terms of the GNU General Public License as published by
  8. # the Free Software Foundation; either version 2, or (at your option)
  9. # any later version.
  10. #
  11. # This program is distributed in the hope that it will be useful,
  12. # but WITHOUT ANY WARRANTY; without even the implied warranty of
  13. # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  14. # GNU General Public License for more details.
  15. #
  16. # You should have received a copy of the GNU General Public License
  17. # along with this software; see the file COPYING. If not, write to
  18. # the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
  19. # Boston, MA 02110-1301 USA
  20. bindir=`dirname $0`
  21. ## Let the user override the preprocessor autoconf found.
  22. test -n "${CPP+set}" || CPP="@CPP@"
  23. ${CPP} -DSCM_MAGIC_SNARF_DOCS "$@"