diff options
Diffstat (limited to 'src/interp/database.boot')
| -rw-r--r-- | src/interp/database.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/database.boot b/src/interp/database.boot index f8a9b6ad..787fb40d 100644 --- a/src/interp/database.boot +++ b/src/interp/database.boot @@ -264,14 +264,14 @@ saveUsersHashTable() == _$ERASE('USERS,'DATABASE,'a) stream:= writeLib1('USERS,'DATABASE,'a) for k in MSORT HKEYS $usersTb repeat - rwrite(k, HGET($usersTb, k), stream) + rwrite(k, tableValue($usersTb, k), stream) RSHUT stream saveDependentsHashTable() == _$ERASE('DEPENDENTS,'DATABASE,'a) stream:= writeLib1('DEPENDENTS,'DATABASE,'a) for k in MSORT HKEYS $depTb repeat - rwrite(k, HGET($depTb, k), stream) + rwrite(k, tableValue($depTb, k), stream) RSHUT stream getUsersOfConstructor(con) == |