From 8f656260b62ed5c1bc59d3f19824bd63ae0d6db5 Mon Sep 17 00:00:00 2001 From: David Kastrup Date: Sat, 4 Feb 2017 23:09:01 +0100 Subject: [PATCH] Issue 5057/4: Stop SCM/int confusion in function documentation tables --- lily/function-documentation.cc | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/lily/function-documentation.cc b/lily/function-documentation.cc index 756f174512..99fbdfe6c8 100644 --- a/lily/function-documentation.cc +++ b/lily/function-documentation.cc @@ -33,11 +33,12 @@ using namespace std; #include "music-function.hh" #include "paper-score.hh" #include "performance.hh" +#include "protected-scm.hh" #include "spanner.hh" #include "stream-event.hh" #include "unpure-pure-container.hh" -static SCM doc_hash_table; +static Protected_scm doc_hash_table; void ly_check_name (const string &cxx, const string &scm_name) @@ -58,8 +59,8 @@ ly_add_function_documentation (SCM func, if (doc == "") return; - if (!doc_hash_table) - doc_hash_table = scm_permanent_object (scm_c_make_hash_table (59)); + if (!doc_hash_table.is_bound ()) + doc_hash_table = scm_c_make_hash_table (59); string s = string (" - ") + "LilyPond procedure: " + fname + " " + varlist + "\n" + doc; -- 2.39.2