diff options
Diffstat (limited to 'src/interp/database.boot')
| -rw-r--r-- | src/interp/database.boot | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/interp/database.boot b/src/interp/database.boot index 72cb5fc7..0bd98389 100644 --- a/src/interp/database.boot +++ b/src/interp/database.boot @@ -38,6 +38,7 @@ import c_-util import clam import cattable import compat +import daase namespace BOOT $getUnexposedOperations := true @@ -132,6 +133,7 @@ getConstructorAttributesFromDB ctor == niladicConstructorFromDB: %Constructor -> %Boolean niladicConstructorFromDB ctor == + property(ctor,'LOADED) => dbNiladic? constructorDB ctor GETDATABASE(ctor,"NILADIC") constructorHasCategoryFromDB: %Pair(%Thing,%Thing) -> %List %Code |