OK, it finally built. At least _something_ succeeded today; I was making some drawers this morning and everything possible went wrong. Clamps didn't, fixtures weren't, router bits took the wrong route... grr.

I had to add #define HAVE_INTERP_H 1 to my non-generated-by-spawn-of-satan- autoconf config.h to prevent CodeMist bitching about the #warning lines in sqMemoryAccess.h But then it was needed anyway I expect.

I had to change the declaration of sourcePtr in BitBltSimulation>primitiveDisplayString from 'unsigned char *' to 'char *' to prevent whining about implicit cast of pointer to non-equal pointer in a byteAt - byteAt expects a char *. 'unsigned char *' is, apparently so vilely not like a 'char *' that all hell breaks loose, sirens, flashing lights, threatening emails, the lot. The amusing part is that byteAt actually explicitly casts the input char * to an unsigned char *... Sigh.

FloatArray didn't compile since primitiveDivFloatArray abuses longAt: and has a type clash. I really couldn't be bothered with it at this hour.

It loads an image, runs it ok, garbage collects, moves windows etc. Must be ok.

tim -- Tim Rowledge, tim@sumeru.stanford.edu, http://sumeru.stanford.edu/tim I must have slipped a disk; my pack hurts.

In message 084bae8050d961234080c30af687f51a@hp.com Ian Piumarta ian.piumarta@hp.com wrote:

On Apr 3, 2005, at 10:25 PM, Tim Rowledge wrote:

...

It loads an image, runs it ok, garbage collects, moves windows etc. Must be ok.

Cool.

(Did you make a 64-bit VM and run the 64-bit image too?)

Nope; no 64bit machine so I can't really do anything useful with it. If I was being paid I might feel like spending the money for such a machine, yadda yadda. Send money.

The other thing we (desperately) need is a set of radio buttons in VMM to select:

1. generate 32-bit VM
2. generate 64-bit VM
3. generate both

with (3) appending a '32' or '64' to the 'path to generated sources' string.

Could work out of the box for you (on unix) and me (on RISC OS) with relative pathnames in the makefiles. Not certain about what paths are in win32 & mac makefiles so such a change might require makelife editing. I imagine people are capable of that once they know what is changed...

I'm not sure about a 'both' button though. With having to re-init OM for each form it wouldn't be doable to simply write out a 32b followed by a 64 b version of each file in turn. It would have to be; do one version of all requested work (remember you can ask for entire vm, just the core+internal, just the external plugins, an individual plugin) and then re-init OM and repeat.

Of course, you can script it easily enough for batch processing; VMMaker has always been scriptable since it was originally written for exobox to do overnight automated builds.

Stick somethng like:- ObjectMemory initBytesPerWord: 4. (VMMaker default sourceDirectoryName: 'somewhervalid/src32' ; initializeInternal: #(BitBltPlugin MiscPrimsPlugin FilePlugin) external: #(SocketPlugin ZipPlugin B2DPlugin) generateEntire. ObjectMemory initBytesPerWord: 8. (VMMaker default sourceDirectoryName: 'somewhervalid/src34' ; initializeInternal: #(BitBltPlugin MiscPrimsPlugin FilePlugin) external: #(SocketPlugin ZipPlugin B2DPlugin) generateEntire. in a buttonmorph script. Modulo the lineend issues you can even use the #setPlatName: method to do cross- 'compilation' which might be useful for batch building and compiling. Given the vile mess of file streams and naming that currently exists it would probably be simpler to make some shell script to do the lineend munging for dos & mac trees.

tim -- Tim Rowledge, tim@sumeru.stanford.edu, http://sumeru.stanford.edu/tim Useful random insult:- Been one too many times through the wormhole.

In message 3a02995c1054e62fa6c2277cc3602084@hp.com Ian Piumarta ian.piumarta@hp.com wrote:

Not necessary. Execute 'ObjectMemory initBytesPerWord: 8', regenerate, [ recompile, fix errors, run 64-bit VM ] repeatAsNecessary.

Ah, that. Well unfortunately that triggers the first actual CodeMist bug I've seen since around '89. No can do. I'll ping the supplier but I won't hold my breath.

That's what we need. With appending '32' and '64' to the path so that each version of the VM goes into a different tree. But it's no real hassle to re-accept the path I guess, since it's mainly once per VM release that most people who care will be wanting to generate both at the same time...

I have a '64bit vm' button for now - I was disturbed by just how hard it was to find a morphic widget that did what I want and to find out how to use it - that works well enough for a first try. It maintains the rule that a user-typed path overrides any default, so if you leave the default path an press for 'machine word size'~ then it changes the path to blah-blah/src[64,32] but if you have set the path manually to 'blahblah/fredsCustomVMSrc' it stays that way.

For batch making of many VMs the script is by far the more efficient approach.

tim -- Tim Rowledge, tim@sumeru.stanford.edu, http://sumeru.stanford.edu/tim REALITY.SYS corrupted- reboot Universe (Y/N)?

On Tuesday 05 April 2005 4:49 pm, Tim Rowledge wrote:

OK, at http://sumeru.stanford.edu/pooters/SqFiles/packages/VMMaker/VMM64bit-2.zip is the MC file a filein to remove some obsolete protocols a revised filein to be filedin BEFORE the MC file is loaded

For me it makes a working 32b vm and generates 64b code that my CC dislikes.

I'm getting a 404 on that...

Not Found The requested URL /pooters/SqFiles/packages/VMMaker/VMM64bit-2.zip was not found on this server.

OK, at http://sumeru.stanford.edu/pooters/SqFiles/packages/VMMaker/VMM64bit-3.zip (note the sub-version number change) is

the MC file a filein to remove some obsolete protocols a revised filein to be filedin BEFORE the MC file is loaded

For me it makes a working 32b vm and generates 64b code that my CC dislikes.

This version include Ned's fixes for deprecated methods, the proper checkbox and an attempt to move buttons around to form slightly more logical groupings, and extending the config file format to support the 64bit vm flag.

tim -- Tim Rowledge, tim@sumeru.stanford.edu, http://sumeru.stanford.edu/tim Useful random insult:- A one-bit brain with a parity error.

Ok, so I loaded all Tim's & Ians work and built a 32bit VM. That works, but I picked up 63 warnings about int versus sqInt or int versus void* conversions. Also I'm using my old plugins with minor changes to stop fatal compiler errors.

Now I attempted to build new plugins and immediately die in processing the AsyncFilePlugin. Tomorrow I guess I'll see what's involved in not loading the 64bit stuff but living with the new sq.h

MessageNotUnderstood: String class>>ccgDeclareCForVar: 13 April 2005 11:14:10 pm

VM: Mac OS - a SmalltalkImage Image: Squeak3.8gamma [latest update: #6548]

SecurityManager state: Restricted: false FileAccess: true SocketAccess: true Working Dir Macintosh HD:Users:johnmci:Shared:Squeak3.8g-6548 Trusted Dir Macintosh HD:Users:johnmci:Shared:Squeak3.8g-6548 Untrusted Dir Macintosh HD:Users:johnmci:Library:Preferences:Squeak:Internet:My Squeak

String class(Object)>>doesNotUnderstand: #ccgDeclareCForVar: Receiver: String Arguments and temporary variables: aMessage: ccgDeclareCForVar: 'fileName' Receiver's instance variables: superclass: AbstractString methodDict: a MethodDictionary(#<->a CompiledMethod (3157) #<=->a CompiledMetho...etc... format: 23554 instanceVariables: nil organization: ('accessing' at: at:put: byteAt: byteAt:put: byteSize) ('comparin...etc... subclasses: #(Symbol) name: #String classPool: nil sharedPools: nil environment: a SystemDictionary(lots of globals) category: nil

[] in SmartSyntaxPluginTMethod>>handlePrimitiveDirective:on: {[:argName :spec | declarations at: argName put: (spec ccgDeclareCForVar:...]} Arguments and temporary variables: aStmt: self primitive: 'primitiveAsyncFileOpen' parameters: #(#String #Boolean ...etc... sStream: a WriteStream #() argName: 'fileName' spec: String expr: nil

OrderedCollection(SequenceableCollection)>>with:do: Receiver: an OrderedCollection('fileName' 'writeFlag' 'semaIndex') Arguments and temporary variables: otherCollection: #(String Boolean SmallInteger) twoArgBlock: [] in SmartSyntaxPluginTMethod>>handlePrimitiveDirective:on: {[:ar...etc... index: 1 indexLimiT: 3 Receiver's instance variables: array: #('fileName' 'writeFlag' 'semaIndex') firstIndex: 1 lastIndex: 3

SmartSyntaxPluginTMethod>>handlePrimitiveDirective:on: Receiver: a SmartSyntaxPluginTMethod (primitiveAsyncFileOpen) Arguments and temporary variables: aStmt: self primitive: 'primitiveAsyncFileOpen' parameters: #(#String #Boolean ...etc... sStream: a WriteStream #() argName: 'fileName' spec: String expr: nil Receiver's instance variables: selector: #primitiveAsyncFileOpen returnType: 'sqInt' args: an OrderedCollection() locals: an OrderedCollection('f' 'fOop' 'okToOpen' 'fileNameSize' 'fileName' 'w...etc... declarations: a Dictionary('f'->'AsyncFile *f' ) primitive: 0 parseTree: [ self primitive: 'primitiveAsyncFileOpen' parameters: #(#String #B...etc... labels: an OrderedCollection() possibleSideEffectsCache: nil complete: false export: false static: true sharedLabel: nil sharedCase: nil comment: nil definingClass: nil globalStructureBuildMethodHasFoo: nil isPrimitive: true suppressingFailureGuards: false fullSelector: #primitiveAsyncFileOpen:forWrite:semaIndex: fullArgs: an OrderedCollection('fileName' 'writeFlag' 'semaIndex') parmSpecs: #(String Boolean SmallInteger) rcvrSpec: Oop

--- The full stack --- String class(Object)>>doesNotUnderstand: #ccgDeclareCForVar: [] in SmartSyntaxPluginTMethod>>handlePrimitiveDirective:on: {[:argName :spec | declarations at: argName put: (spec ccgDeclareCForVar:...]} OrderedCollection(SequenceableCollection)>>with:do: SmartSyntaxPluginTMethod>>handlePrimitiveDirective:on: - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - SmartSyntaxPluginTMethod>>primitiveDirectiveWasHandled:on: [] in SmartSyntaxPluginTMethod>>extractPrimitiveDirectives {[:stmt | (self primitiveDirectiveWasHandled: stmt on: sStream) ifFalse: [s...]} OrderedCollection>>do: [] in SmartSyntaxPluginTMethod>>extractPrimitiveDirectives {[:sStream | parseTree statements do: [:stmt | (self primitiveDirectiveWasH...]} Array class(SequenceableCollection class)>>streamContents: SmartSyntaxPluginTMethod>>extractPrimitiveDirectives SmartSyntaxPluginTMethod>>setSelector:args:locals:block:primitive: MethodNode>>asTranslationMethodOfClass: [] in SmartSyntaxPluginCodeGenerator(CCodeGenerator)>>addClass: {[:sel :i | bar value: i. source := aClass sourceCodeAt: sel. self addMe...]} [] in Set>>doWithIndex: {[:item | aBlock2 value: item value: (index := index + 1)]} Set>>do: Set>>doWithIndex: [] in SmartSyntaxPluginCodeGenerator(CCodeGenerator)>>addClass: {[:bar | aClass selectors doWithIndex: [:sel :i | bar value: i. sour...]} [] in ProgressInitiationException>>defaultMorphicAction {[result := workBlock value: progress]} ...etc... On Apr 7, 2005, at 11:37 AM, Tim Rowledge wrote:

Oh, I forgot to mention - FloatArray plugin needs a fix. I don't have time.

tim

Tim Rowledge, tim@sumeru.stanford.edu, http://sumeru.stanford.edu/tim World Ends at Ten! Pictures at 11 on Fox News!

-- ======================================================================== === John M. McIntosh johnmci@smalltalkconsulting.com 1-800-477-2659 Corporate Smalltalk Consulting Ltd. http://www.smalltalkconsulting.com ======================================================================== ===

In message 200504052340.51423.ned@bike-nomad.com Ned Konz ned@bike-nomad.com wrote:

Attached are some changes that make a real checkBox and also simplify the GUI building.

And a bit of minor code polishing as well (deprecated methods, you know...).

Thanks Ned.

Couple of questions about the changes.

Why the Object>touch: ? (and >primitive* for that matter) What on earth is AlignmentMorph inARow: ? Never seen that one before..

tim -- Tim Rowledge, tim@sumeru.stanford.edu, http://sumeru.stanford.edu/tim Useful random insult:- There are great people in the world, but she's not one of them.

On Apr 1, 2005, at 07:05, Ned Konz wrote:

Do you know which, if any, plugins need special attention / weren't tested?

Yes -- and I have some thoughts on this. I'll make a "plugin progress matrix" and post it Sunday or Monday.

Cheers, Ian