diff --git a/queries/folds.scm b/queries/folds.scm
index b8b5735..2839316 100644
--- a/queries/folds.scm
+++ b/queries/folds.scm
@@ -5,6 +5,7 @@
    (package_declaration)
    (generic_package_declaration)
    (package_body)
+   (subprogram_declaration)
    (subprogram_body)
    (block_statement)
    (if_statement)