Fixed a _MAJOR_ problem: PROCEDURE-HASH previously wouldn't work in stripped-scsh.image, because templates don't have debug data in them in that; however, they still have uids, so I used TEMPLATE-ID instead of stuff involving debug data.

s48/procedure-tables/packages.scm

@@ -3,8 +3,7 @@
         more-types
         loopholes
         closures
-        disclosers
-        debug-data)
+        disclosers)
   (files procedure-hash))
 
 (define-structure procedure-tables procedure-tables-interface

s48/procedure-tables/procedure-hash.scm

@@ -5,7 +5,4 @@
 ;;; the distribution.
 
 (define (procedure-hash proc)
-  (debug-data-uid
-   (template-debug-data
-    (closure-template
-     (loophole :closure proc)))))
+  (template-id (closure-template (loophole :closure proc))))