Hello,

The logging of sources is not part of the compiler. It is part of the behavior API.��

Something like that would work :

ATMinimalLearningObject >> addFromObjectSelector: aSelector
�� self class compile:��(Object >> aSelector) sourceCode classified: #foo

Now it is strange that the decompiler can't decompile instVarAt: . It looks like it is a bug related to primitive error code decompilation. This is something I should look at during the sprint...

2016-01-27 20:42 GMT+01:00 stepharo <stepharo@free.fr>:

Hi guys

I'm on holidays (no book no mooc no bugs just playing magic good music and hacking a bit)
and I wanted to implemented a fun object that learn from Object by copying the methods.

ProtoObject subclass: #ATMinimalLearningObject
�� instanceVariableNames: ''
�� classVariableNames: ''
�� package: 'MiniActalk2'

ATMinimalLearningObject >> doesNotUnderstand: aMessage

�� | sel |
�� sel := aMessage selector.
�� Transcript show: 'Does not understand ',�� sel printString ; cr.
�� ^ (Object includesSelector: sel)
�� ifTrue: [
�� self addFromObjectSelector: sel.
�� aMessage sendTo: self ]
�� ifFalse: [ super doesNotUnderstand: aMessage ].

ATMinimalLearningObject >> addFromObjectSelector: aSelector

�� | method |
�� method := OpalCompiler new
�� class: self class;
�� source: (Object sourceCodeAt: aSelector);
�� compile.
�� self class addSelector: aSelector withMethod: method.

ATMinimalLearningObject subclass: #ATProtozoid
�� instanceVariableNames: 'ff'
�� classVariableNames: ''
�� package: 'MiniActalk2'

Now it is working but I have the impression that we may have a problem.

When I do
ATProtozoid new instVarAt: 1

I get the following definition for instVarAt:

instVarAt: t1
�� self error: 'Decompilation failed'

but

Object sourceCodeAt: #instVarAt: returns the correct string.

��'instVarAt: index
�� "Primitive. Answer a fixed variable in an object. The numbering of the variables
�� corresponds to the named instance variables, followed by the indexed instance
�� variables. Fail if the index is not an Integer or is not the index of a fixed variable.
�� Essential. See Object documentation whatIsAPrimitive."

�� <primitive: 173 error: ec>
�� self primitiveFailed'

May be the compile is not logging the method body.
But since the compiler is full uncommented this is super nice to learn and get empowered.

Stef