#ifndef SCM_DEPRECATED_H #define SCM_DEPRECATED_H /* Copyright 2003-2007,2009-2018,2020-2022,2025 Free Software Foundation, Inc. This file is part of Guile. Guile 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 3 of the License, or (at your option) any later version. Guile 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 Guile. If not, see . */ #include "libguile/snarf.h" #if (SCM_ENABLE_DEPRECATED == 1) #define SCM_SMOB_MARK SCM_SMOB_MARK__Gone__Contact_guile_devel_for_alternatives #define SCM_GLOBAL_SMOB_MARK SCM_GLOBAL_SMOB_MARK__Gone__Contact_guile_devel_for_alternatives #define scm_mark0 scm_mark0__Gone__Contact_guile_devel_for_alternatives #define scm_markcdr scm_markcdr__Gone__Contact_guile_devel_for_alternatives #define scm_free0 scm_free0__Gone__Contact_guile_devel_for_alternatives #define scm_set_smob_mark scm_set_smob_mark__Gone__Contact_guile_devel_for_alternatives #define scm_gc_mark scm_gc_mark__Gone__Contact_guile_devel_for_alternatives SCM_DEPRECATED SCM scm_make_guardian (void); #define SCM_I_WVECTP(x) (scm_is_weak_vector (x)) SCM_DEPRECATED SCM scm_make_weak_vector (SCM len, SCM fill); SCM_DEPRECATED SCM scm_weak_vector (SCM l); SCM_DEPRECATED SCM scm_weak_vector_p (SCM x); SCM_DEPRECATED SCM scm_weak_vector_length (SCM v); SCM_DEPRECATED SCM scm_weak_vector_ref (SCM v, SCM k); SCM_DEPRECATED SCM scm_weak_vector_set_x (SCM v, SCM k, SCM x); SCM_DEPRECATED SCM scm_c_make_weak_vector (size_t len, SCM fill); SCM_DEPRECATED int scm_is_weak_vector (SCM obj); SCM_DEPRECATED size_t scm_c_weak_vector_length (SCM vec); SCM_DEPRECATED SCM scm_c_weak_vector_ref (SCM v, size_t k); SCM_DEPRECATED void scm_c_weak_vector_set_x (SCM v, size_t k, SCM x); SCM_DEPRECATED SCM scm_object_properties (SCM obj); SCM_DEPRECATED SCM scm_set_object_properties_x (SCM obj, SCM plist); SCM_DEPRECATED SCM scm_object_property (SCM obj, SCM key); SCM_DEPRECATED SCM scm_set_object_property_x (SCM obj, SCM key, SCM val); SCM_DEPRECATED SCM scm_sym_filename; SCM_DEPRECATED SCM scm_sym_line; SCM_DEPRECATED SCM scm_sym_column; SCM_DEPRECATED SCM scm_supports_source_properties_p (SCM obj); SCM_DEPRECATED SCM scm_source_property (SCM obj, SCM key); SCM_DEPRECATED SCM scm_set_source_property_x (SCM obj, SCM key, SCM datum); SCM_DEPRECATED SCM scm_source_properties (SCM obj); SCM_DEPRECATED SCM scm_set_source_properties_x (SCM obj, SCM props); SCM_DEPRECATED SCM scm_cons_source (SCM xorig, SCM x, SCM y); /* Deprecated declarations go here. */ void scm_i_init_deprecated (void); #endif #endif /* SCM_DEPRECATED_H */