Register parameter-binding?.

diff --git a/src/runtime/parametric-predicate.scm b/src/runtime/parametric-predicate.scm
index f731eb5d7a194f1384f4b623ea4614af9b141de4..d223c6388e8c67fab122b91cdc51ad0fc1fb4a17 100644 (file)
--- a/src/runtime/parametric-predicate.scm
+++ b/src/runtime/parametric-predicate.scm
@@ -248,6 +248,7 @@ USA.
    (register-predicate! parametric-predicate? 'parametric-predicate
                        '<= predicate?)
    (register-predicate! predicate-template? 'predicate-template)
+   (register-predicate! parameter-binding? 'parameter-binding)
    (register-predicate! template-pattern? 'template-pattern
                        '<= non-empty-list?)))