diff options
author | Kevin Ryde <user42@zip.com.au> | 2007-03-07 23:12:36 +0000 |
---|---|---|
committer | Kevin Ryde <user42@zip.com.au> | 2007-03-07 23:12:36 +0000 |
commit | 651f2cd27d30856f172b9c64226534a9984981c9 (patch) | |
tree | 4bf7b3c901843502a3a9988da22985fef1820596 /libguile/struct.h | |
parent | 004be623c4f68896473b0f9a5285fc76ca1e0b34 (diff) | |
download | guile-651f2cd27d30856f172b9c64226534a9984981c9.tar.gz |
merge from 1.8 branch
Diffstat (limited to 'libguile/struct.h')
-rw-r--r-- | libguile/struct.h | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/libguile/struct.h b/libguile/struct.h index fcd8ec858..4b263d2e5 100644 --- a/libguile/struct.h +++ b/libguile/struct.h @@ -3,7 +3,7 @@ #ifndef SCM_STRUCT_H #define SCM_STRUCT_H -/* Copyright (C) 1995,1997,1999,2000,2001, 2006 Free Software Foundation, Inc. +/* Copyright (C) 1995,1997,1999,2000,2001, 2006, 2007 Free Software Foundation, Inc. * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public @@ -93,6 +93,7 @@ SCM_API SCM scm_make_struct_layout (SCM fields); SCM_API SCM scm_struct_p (SCM x); SCM_API SCM scm_struct_vtable_p (SCM x); SCM_API SCM scm_make_struct (SCM vtable, SCM tail_array_size, SCM init); +SCM_API SCM scm_make_vtable (SCM fields, SCM printer); SCM_API SCM scm_make_vtable_vtable (SCM extra_fields, SCM tail_array_size, SCM init); SCM_API SCM scm_i_struct_equalp (SCM s1, SCM s2); SCM_API SCM scm_struct_ref (SCM handle, SCM pos); |