Now we have some working....
https://lh6.googleusercontent.com/-hW0kj1zV41A/TowvmrwnNfI/AAAAAAAAALM/4ycnO
7Xw2eM/s720/AliceRevival2.jpg
Class from exported .cs of old FunSqueak was not initialized as should be
and I must do manual work.
Help me, how I could be sure ALL classes of .cs was proper initialized ?
I using the .mdl coming in Cobalt in Avatar folder.
It¹s faire use it ? License issues ?
Edgar
'From Squeak4.2alpha of 2 October 2011 [latest update: #11712] on 5 October
2011 at 5:43:55 am'!
!Object methodsFor: 'objects from disk' stamp: 'edc 10/5/2011 05:43:11.619'!
saveOnFileNamed: aString
"Ask the user for a filename and save myself on a
ReferenceStream file. Writes out the version and class structure.
The file is fileIn-able. UniClasses will be filed out.
This save objects as .obj"
| aFileName fileStream |
aString isEmpty
ifTrue: [^ self error: 'name is missing'].
aFileName := aString , '.obj'.
fileStream := ReferenceStream fileNamed: aFileName .
fileStream nextPut: self.
fileStream close.
! !
!Object class methodsFor: '*services-extras' stamp: 'edc 2/14/2008 08:24'!
fileReaderServicesForFile: fullName suffix: suffix
| services |
services _ OrderedCollection new.
(fullName asLowercase endsWith: '.obj')
ifTrue: [ services add: self serviceLoadObject ].
^services! !
!Object class methodsFor: '*services-extras' stamp: 'edc 2/14/2008 08:26'!
serviceLoadObject
"Answer a service for opening a saved Object"
^ (SimpleServiceEntry
provider: self
label: 'saved Object'
selector: #readAndInspect:
description: 'open a Object'
buttonLabel: 'object')
argumentGetter: [:fileList | fileList readOnlyStream]! !
!Object class methodsFor: 'objects from disk' stamp: 'edc 7/1/2011 10:17'!
readAndInspect: inputStream
| o rr |
rr _ ReferenceStream on: inputStream.
o _ rr next.
rr close.
o inspect! !
!Object class reorganize!
('*SlangBrowser-VMMaker-Translation to C' asCString: asInlinedCString:)
('*VMMaker-plugin generation' ccg:emitLoadFor:from:on:
ccg:generateCoerceToOopFrom:on: ccg:generateCoerceToValueFrom:on:
ccg:prolog:expr:index: ccgCanConvertFrom: ccgDeclareCForVar:)
('*ma base additions' registerSelfAsFileReader)
('*ma object serialization' maInstancesRequireOwnBuffer
maLoadVariableObjectFrom: maMaterializeFrom:using:)
('*magritte-model-accessing' description)
('*metacello-mc' lastMetacelloVersionLoad metacelloVersion:loads:)
('*services-extras' fileReaderServicesForFile:suffix: readCompressedObject:
registeredServices serviceCompressedObject serviceLoadObject)
('class initialization' flushDependents flushEvents initialize
initializeDependentsFields reInitializeDependentsFields)
('documentation' howToModifyPrimitives whatIsAPrimitive)
('file list services' fileReaderServicesForDirectory: services)
('instance creation' categoryForUniclasses chooseUniqueClassName
initialInstance initializedInstance instanceOfUniqueClass
instanceOfUniqueClassWithInstVarString:andClassInstVarString: isUniClass
lookForClass: lookForClassIn3dot10: lookForClassIn3dot11: lookForClassIn3dot9:
newFrom: newUniqueClassInstVars:classInstVars: newUserInstance
readCarefullyFrom: readFrom:)
('objects from disk' createFrom:size:version: readAndInspect:)
('window color' windowColorSpecification)
('private' releaseExternalSettings)
!
