1# Fuse.pm: perl modules for autogenerated Fuse code
2
3# This program is free software; you can redistribute it and/or modify
4# it under the terms of the GNU General Public License as published by
5# the Free Software Foundation; either version 2 of the License, or
6# (at your option) any later version.
7
8# This program is distributed in the hope that it will be useful,
9# but WITHOUT ANY WARRANTY; without even the implied warranty of
10# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
11# GNU General Public License for more details.
12
13# You should have received a copy of the GNU General Public License along
14# with this program; if not, write to the Free Software Foundation, Inc.,
15# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
16
17# Author contact information:
18
19# E-mail: philip-fuse@shadowmagic.org.uk
20
21package Fuse;
22
23use strict;
24
25sub GPL ($$) {
26
27    my( $description, $copyright ) = @_;
28
29    return << "CODE";
30/* $description
31   Copyright (c) $copyright
32
33   This program is free software; you can redistribute it and/or modify
34   it under the terms of the GNU General Public License as published by
35   the Free Software Foundation; either version 2 of the License, or
36   (at your option) any later version.
37
38   This program is distributed in the hope that it will be useful,
39   but WITHOUT ANY WARRANTY; without even the implied warranty of
40   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
41   GNU General Public License for more details.
42
43   You should have received a copy of the GNU General Public License along
44   with this program; if not, write to the Free Software Foundation, Inc.,
45   51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
46
47   Author contact information:
48
49   E-mail: philip-fuse\@shadowmagic.org.uk
50
51*/
52CODE
53
54}
55
561;
57