If objects and DescriptorSystem inherited from basic DescriptorSystem than read and write are ok.
But if its inherited from ActiveRecord and ActiveRecordDescriptorSystem than get error on reading object User.
How repeat it:
1. File-in GlorpDown.st
2. in workspace execute (repeat you database account):
login := (Glorp.Login new)
database: PostgreSQLPlatform new;
connectString: 'localhost_test';
username: 'user';
password: 'password';
yourself.
GlorpDownActiveRecord defaultLogin: login.
GlorpDownActiveRecord defaultSystem: GlorpDownDescriptorSystem.
user := User new.
user save.
User findAll
"^^Error here"
"Copy of Stack"
Unhandled exception: Message not understood: #table
UndefinedObject(Object)>>doesNotUnderstand:
Glorp.MappingExpression(Glorp.ObjectExpression)>>translateField:
Glorp.MappingExpression>>translateField:
optimized [] in Glorp.ObjectExpression>>translateFields:
optimized [] in OrderedCollection>>collect:
OrderedCollection>>do:
OrderedCollection>>collect:
Glorp.MappingExpression(Glorp.ObjectExpression)>>translateFields:
Glorp.MappingExpression>>translateFields:
Glorp.ObjectBuilder>>fieldsFromThePerspectiveOfTheMainSelect:
Glorp.ObjectBuilder>>fieldsForSelectStatement
Glorp.SimpleQuery>>computeFieldsFor:
optimized [] in Glorp.SimpleQuery>>computeFields
Array(SequenceableCollection)>>do:
Glorp.SimpleQuery>>computeFields
Glorp.SimpleQuery>>prepare
Glorp.SimpleQuery(Glorp.AbstractReadQuery)>>shortCircuitEmptyReturn:
Glorp.SimpleQuery>>rowsFromDatabaseWithParameters:
Glorp.SimpleQuery(Glorp.AbstractReadQuery)>>readFromDatabaseWithParameters:
Glorp.SimpleQuery(Glorp.AbstractReadQuery)>>executeWithParameters:in:
Glorp.GlorpSession>>execute:
Glorp.GlorpSession>>read:
User class(Glorp.ActiveRecords.ActiveRecord class)>>findAll
UndefinedObject>>unboundMethod
UndefinedObject(Object)>>performMethod:arguments:
UndefinedObject(Object)>>performMethod:
TextEditorController(ParagraphEditor)>>evaluateCompiled:
optimized [] in ParagraphEditor>>evaluateSelection
BlockClosure>>ensure:
Cursor>>showWhile:
TextEditorController(ParagraphEditor)>>evaluateSelection
optimized [] in ParagraphEditor>>doIt
BlockClosure>>on:do:
TextEditorController(ParagraphEditor)>>doIt
WorkspacePage>>doIt
Workbook(AbstractWorkspace)>>smalltalkDoIt
Package with examole glorp down