<pre style='margin:0'>
Joshua Root (jmroot) pushed a commit to branch release-2.10
in repository macports-base.

</pre>
<p><a href="https://github.com/macports/macports-base/commit/a7a54fc9bdbe171688e7efb466448f5e7ec7427c">https://github.com/macports/macports-base/commit/a7a54fc9bdbe171688e7efb466448f5e7ec7427c</a></p>
<pre style="white-space: pre; background: #F8F8F8"><span style='display:block; white-space:pre;color:#808000;'>commit a7a54fc9bdbe171688e7efb466448f5e7ec7427c
</span>Author: Joshua Root <jmr@macports.org>
AuthorDate: Sat Oct 5 05:15:27 2024 +1000

<span style='display:block; white-space:pre;color:#404040;'>    registry.c: say which function errored
</span><span style='display:block; white-space:pre;color:#404040;'>    
</span><span style='display:block; white-space:pre;color:#404040;'>    (cherry picked from commit b8e9820a7ee1ee1dce1e5e34373fb90561bafd4f)
</span>---
 src/registry2.0/registry.c | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

<span style='display:block; white-space:pre;color:#808080;'>diff --git a/src/registry2.0/registry.c b/src/registry2.0/registry.c
</span><span style='display:block; white-space:pre;color:#808080;'>index 64a0b5ce7..de6dbcf5d 100644
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>--- a/src/registry2.0/registry.c
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/src/registry2.0/registry.c
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -143,7 +143,7 @@ static void delete_reg(ClientData reg, Tcl_Interp* interp) {
</span>     reg_error error;
     if (((reg_registry*)reg)->status & reg_attached) {
         if (reg_optimize((reg_registry*)reg, &error) == 0) {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-            fprintf(stderr, "%s\n", error.description);
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+            fprintf(stderr, "reg_optimize: %s\n", error.description);
</span>             reg_error_destruct(&error);
         }
         if (Tcl_GetAssocData(interp, "registry::needs_vacuum", NULL) != NULL) {
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -151,16 +151,16 @@ static void delete_reg(ClientData reg, Tcl_Interp* interp) {
</span>             Tcl_DeleteAssocData(interp, "registry::needs_vacuum");
         }
         if (reg_checkpoint((reg_registry*)reg, &error) == 0) {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-            fprintf(stderr, "%s\n", error.description);
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+            fprintf(stderr, "reg_checkpoint: %s\n", error.description);
</span>             reg_error_destruct(&error);
         }
         if (!registry_tcl_detach(interp, (reg_registry*)reg, &error)) {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-            fprintf(stderr, "%s", error.description);
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+            fprintf(stderr, "registry_tcl_detach: %s", error.description);
</span>             reg_error_destruct(&error);
         }
     }
     if (!reg_close((reg_registry*)reg, &error)) {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-        fprintf(stderr, "%s", error.description);
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        fprintf(stderr, "reg_close: %s", error.description);
</span>         reg_error_destruct(&error);
     }
 }
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -245,7 +245,7 @@ static int registry_close(ClientData clientData UNUSED, Tcl_Interp* interp,
</span>         } else {
             reg_error error;
             if (reg_optimize(reg, &error) == 0) {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-                fprintf(stderr, "%s\n", error.description);
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                fprintf(stderr, "reg_optimize: %s\n", error.description);
</span>                 reg_error_destruct(&error);
             }
             if (Tcl_GetAssocData(interp, "registry::needs_vacuum", NULL) != NULL) {
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -254,7 +254,7 @@ static int registry_close(ClientData clientData UNUSED, Tcl_Interp* interp,
</span>             }
             /* Not really anything we can do if this fails. */
             if (reg_checkpoint(reg, &error) == 0) {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-                fprintf(stderr, "%s\n", error.description);
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                fprintf(stderr, "reg_checkpoint: %s\n", error.description);
</span>                 reg_error_destruct(&error);
             }
             if (registry_tcl_detach(interp, reg, &error)) {
</pre><pre style='margin:0'>

</pre>