aboutsummaryrefslogtreecommitdiff
path: root/src/interp/database.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/database.boot')
-rw-r--r--src/interp/database.boot4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/interp/database.boot b/src/interp/database.boot
index 648ce919..e4c71bf6 100644
--- a/src/interp/database.boot
+++ b/src/interp/database.boot
@@ -815,3 +815,7 @@ loadDBIfNecessary db ==
ctor := dbConstructor db
dbLoaded? db => db
loadDB db
+
+++ Return true if this DB is for a category default package.
+macro dbDefaultPackage? db ==
+ isDefaultPackageName dbConstructor db