diff options
| author | dos-reis <gdr@axiomatics.org> | 2011-08-22 02:09:12 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2011-08-22 02:09:12 +0000 |
| commit | c1bf697ff6bf2b914a40b3e867a84762cf214cf1 (patch) | |
| tree | dabb4e77ac5f6549e7c26bef740ae34b4ba9fdc6 /src/interp/database.boot | |
| parent | 01d00dd8cc892cd2666297557dd3dc68c0f273c8 (diff) | |
| download | open-axiom-c1bf697ff6bf2b914a40b3e867a84762cf214cf1.tar.gz | |
* interp/database.boot (getConstructorModemap): Rename from
getConstructorModemapFromDB. Adjust callers.
Diffstat (limited to 'src/interp/database.boot')
| -rw-r--r-- | src/interp/database.boot | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/interp/database.boot b/src/interp/database.boot index e4245440..d29882a2 100644 --- a/src/interp/database.boot +++ b/src/interp/database.boot @@ -77,9 +77,9 @@ getConstructorAncestorsFromDB ctor == ++ return the modemap of the constructor or the instantiation ++ of the constructor `form'. -getConstructorModemapFromDB: %Constructor -> %Mode -getConstructorModemapFromDB form == - GETDATABASE(opOf form, 'CONSTRUCTORMODEMAP) +getConstructorModemap: %Constructor -> %Mode +getConstructorModemap ctor == + GETDATABASE(ctor, 'CONSTRUCTORMODEMAP) getConstructorFormFromDB: %Constructor -> %Form getConstructorFormFromDB ctor == |