/tags/rel-1-3-24/SWIG/Tools/WAD/Tcl/wadtclinit.cxx
# · C++ · 38 lines · 9 code · 4 blank · 25 comment · 0 complexity · e7c939cc84eb85edb3d05eea3d4e3245 MD5 · raw file
- /* -----------------------------------------------------------------------------
- * wadtclinit.cxx
- *
- * C++ initializer for Tcl wad.
- *
- * Copyright (C) 2000. The University of Chicago.
- *
- * This library 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 2.1 of the License, or (at your option) any later version.
- *
- * This library 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 library; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
- *
- * See the file COPYING for a complete copy of the LGPL.
- * ----------------------------------------------------------------------------- */
- static char cvs[] = "$Header$";
- extern "C" void tclwadinit();
- /* This hack is used to auto-initialize wad regardless of whether we are
- used as an imported module or as a link-library for another module */
-
- class wadinitializer {
- public:
- wadinitializer() {
- tclwadinit();
- }
- };
- static wadinitializer wi;