summaryrefslogtreecommitdiff
path: root/libguile/smob.h
diff options
context:
space:
mode:
authorDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2001-08-31 12:13:50 +0000
committerDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2001-08-31 12:13:50 +0000
commitdee01b012cd5179b70a2e361ee08c364ed9f3314 (patch)
tree342478de9cb5237437a734aa88b7c9fe26533845 /libguile/smob.h
parentb29058ffee392969b448f8157afaf370c17a736c (diff)
downloadguile-dee01b012cd5179b70a2e361ee08c364ed9f3314.tar.gz
* Removed deprecated stuff.
* Some more renamings to SCM_<filename>_H.
Diffstat (limited to 'libguile/smob.h')
-rw-r--r--libguile/smob.h27
1 files changed, 6 insertions, 21 deletions
diff --git a/libguile/smob.h b/libguile/smob.h
index d7551f842..679966c2f 100644
--- a/libguile/smob.h
+++ b/libguile/smob.h
@@ -2,18 +2,19 @@
#ifndef SCM_SMOB_H
#define SCM_SMOB_H
+
/* Copyright (C) 1995,1996,1998,1999,2000,2001 Free Software Foundation, Inc.
- *
+ *
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2, or (at your option)
* any later version.
- *
+ *
* This program 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 General Public License for more details.
- *
+ *
* You should have received a copy of the GNU General Public License
* along with this software; see the file COPYING. If not, write to
* the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
@@ -42,7 +43,9 @@
* If you write modifications of your own for GUILE, it is your choice
* whether to permit this exception to apply to your modifications.
* If you do not wish that, delete this exception notice. */
+
+
#include "libguile/__scm.h"
#include "libguile/print.h"
@@ -161,24 +164,6 @@ extern void scm_set_smob_apply (scm_t_bits tc,
extern SCM scm_make_smob (scm_t_bits tc);
extern void scm_smob_prehistory (void);
-
-
-#if (SCM_DEBUG_DEPRECATED == 0)
-
-extern long scm_make_smob_type_mfpe (char *name, size_t size,
- SCM (*mark) (SCM),
- size_t (*free) (SCM),
- int (*print) (SCM, SCM, scm_print_state*),
- SCM (*equalp) (SCM, SCM));
-
-extern void scm_set_smob_mfpe (long tc,
- SCM (*mark) (SCM),
- size_t (*free) (SCM),
- int (*print) (SCM, SCM, scm_print_state*),
- SCM (*equalp) (SCM, SCM));
-
-#endif /* SCM_DEBUG_DEPRECATED == 0 */
-
#endif /* SCM_SMOB_H */
/*