January 2012 - Pharo-users - lists.pharo.org

[COTDC] 103 - ZLibWriteStream
by sean＠clipperadams.com Jan. 10, 2012

Jan. 10, 2012

102 classes done 794 classes remaining Continuing in Compression... Today: ZLibWriteStream Comment Of The Day Contest - One Day One Comment Rules: #1: Each day a not commented class is elected. Each day the best comment will be integrated with name of the author(s). #2: If you cannot comment it, deprecate it. Results: http://code.google.com/p/pharo/wiki/CommentOfTheDayContest p.s. this message was sent from a pharo image. Did you know you could easily do that?!

1 0

another confusing result
by Larry White Jan. 9, 2012

Jan. 9, 2012

This may just be me misunderstanding the way it's supposed to work, but I was exploring the method combinations: kk atATimeDo: aBlock defined in SequenceableCollection 'abcde' combinations: 2 atATimeDo: [:each | Transcript cr; show: each printString]. produces the expected result: #($a $b) #($a $c) #($a $d) #($a $e) #($b $c) #($b $d) #($b $e) #($c $d) #($c $e) #($d $e) but, if you add :each to a collection instead of printing, you get something different. The following code: res := OrderedCollection new. 'abcde' combinations: 2 atATimeDo: [:each | res add: each]. Transcript show: res. produces: an OrderedCollection(#($e $e) #($e $e) #($e $e) #($e $e) #($e $e) #($e $e) #($e $e) #($e $e) #($e $e) #($e $e)) Thanks again.

3 3

strange behavior in workspace
by Larry White Jan. 8, 2012

Jan. 8, 2012

I'm messing about with Project Euler problems and have noticed some behavior that I don't understand. This one happens to be very self-contained so I though I'd as for assistance. This code (which doesn't solve the problem, btw) is buggy, but I can't see the bug and I'm beginning to suspect something in the VM or the class libraries. When I execute it, two odd things happen: First, in spite of the block test [sum < 100] whileTrue:[...] it continues to run when sum > 100 (or a million for that matter). Second, the block in the line: (sum isPrime) ifTrue: [ (seq size > bestSeq size) ifTrue: [ bestSeq := seq copy.]] executes even when sum is not a prime number. Any help is appreciated. ------------------------------- "Create a list of primes smaller than a million" primes := OrderedCollection new. 2 to: 999999 do: [ :n | n isPrime ifTrue: [ primes add: n]]. bestSeq := OrderedCollection new. seq := OrderedCollection new. sum := 0. [sum < 100] whileTrue: [ primes do: [:prime | seq add: prime. sum := seq sum. (sum isPrime) ifTrue: [ (seq size > bestSeq size) ifTrue: [ bestSeq := seq copy.]] ] ].

1 1

[COTDC] 102 - ZLibReadStream
by sean＠clipperadams.com Jan. 8, 2012

Jan. 8, 2012

101 classes done 795 classes remaining Continuing in Compression... Today: ZLibReadStream Comment Of The Day Contest - One Day One Comment Rules: #1: Each day a not commented class is elected. Each day the best comment will be integrated with name of the author(s). #2: If you cannot comment it, deprecate it. Results: http://code.google.com/p/pharo/wiki/CommentOfTheDayContest p.s. this message was sent from a pharo image. Did you know you could easily do that?!

1 0

compressing multiple files in Pharo
by Larry White Jan. 8, 2012

Jan. 8, 2012

Hi, I'm trying to help a friend with her non-profit website. She needs to be able to bundle files into a single file for easy downloading (and easy unpacking on the client). The files are pre-compressed sound files so further compression isn't really needed or useful. My first attempt used ZipArchive, which seemed to write ok, but I can't decompress it. (I tried to describe that problem in another email.) I'm now trying to compress more than one file to a GZipWriteStream. I copied and modified the code in the compressed method on FileStream to look like this: compressFiles "Write a new file that has the data in files compressed in GZip format." | zipped buffer file dir | dir := self directoryFor: 'hgo' language: 'arabic'. zipped := dir newFileNamed: ('foobar', FileDirectory dot, 'gz'). zipped binary; setFileTypeToObject. zipped := GZipWriteStream on: zipped. dir fileNames do: [:fName | file := FileStream fileNamed: fName. file readOnly; binary. buffer := ByteArray new: 50000. [file atEnd] whileFalse: [ zipped nextPutAll: (file nextInto: buffer)]. file close.]. zipped close. ^zipped It doesn't work. It seems to compress the first file ok, but the others aren't included. Is there a reliable way in Pharo to solve the underlying problem of packing multiple binaries into a single file? thanks much.

1 0

[COTDC] 101 - TarArchiveMember
by sean＠clipperadams.com Jan. 8, 2012

Jan. 8, 2012

100 classes done 796 classes remaining Continuing in Compression... Today: TarArchiveMember Comment Of The Day Contest - One Day One Comment Rules: #1: Each day a not commented class is elected. Each day the best comment will be integrated with name of the author(s). #2: If you cannot comment it, deprecate it. Results: http://code.google.com/p/pharo/wiki/CommentOfTheDayContest p.s. this message was sent from a pharo image. Did you know you could easily do that?!

1 0

Call for translation
by Hilaire Fernandes Jan. 7, 2012

Jan. 7, 2012

Hello, Dr. Geo (http://www.drgeo.eu) is a neat open source application showing the power of Pharo Smalltalk. It is targeted to teachers, parents and kids for all over the world. It is distributed as a portable desktop application and also a XO application for the OLPC kid laptop. As for now it is translated in English, French, German and Spanish. I would love to see more translation from the European house (latin alphabet based, there is still investigation to be done for non latin language). Italian, Portuguese, Swedish, Finland, Dutch, Norwich, Danish... will be nice Translating DrGeo is less than one hour of work[1]. Hilaire [1] http://www.drgeo.eu/community/faq#TOC-How-can-I-translate-Dr.-Geo-in-my-n -- Dr. Geo -- http://www.drgeo.eu

1 0

[ANN][DBX] Phoseydon Beta2
by Guillermo Polito Jan. 6, 2012

Jan. 6, 2012

Hi! I'm willing to announce the second beta release of Phoseydon, part of the DBXTalk project, supported by ESUG :). It's main new feature is a simple internal dsl to generate entities, so you can create applications from something like: personEntity := application entityNamed: #Person. personEntity hasString: #nickname; hasInteger: #age; hasBoolean: #isProgrammer. petEntity := application entityNamed: #Pet. petEntity hasString: #nickname. personEntity hasMany: #Pet as: #pets. petEntity hasOne: #Person as: #owner. Also, a little manual is already written in: http://dbxtalk.smallworks.com.ar/pier/Documentation For download: http://dbxtalk.smallworks.com.ar/pier/Download Issues, mails, questions: http://dbxtalk.smallworks.com.ar/pier/Support Cheers, the DBXTalk Team

2 1

[COTDC] 100 - GZipConstants
by sean＠clipperadams.com Jan. 6, 2012

Jan. 6, 2012

A new class for the New Year... 99 classes done 797 classes remaining Continuing in Compression... Today: GZipConstants Comment Of The Day Contest - One Day One Comment Rules: #1: Each day a not commented class is elected. Each day the best comment will be integrated with name of the author(s). #2: If you cannot comment it, deprecate it. Results: http://code.google.com/p/pharo/wiki/CommentOfTheDayContest p.s. this message was sent from a pharo image. Did you know you could easily do that?!

1 0

Jan. 1, 2012

Hi guys I wish you good health (because at the end this is the most important and when we are going well we do not estimate how cool it is). Then lot of fun and business. Stef

3 2

Interpreting a crash.dmp file was: Re: [Seaside] Seaside image health check
by Paul DeBruicker Jan. 1, 2012

Jan. 1, 2012

On 11-12-22 08:46 AM, Levente Uzonyi wrote: > If you're using CogVM, then you can force printing the content of all > smalltalk stacks to stdout by sending a USR1 signal to the process with > the following command: > > kill -USR1 <pid> > > The currently active process will be printed first. Thanks Levente. I have an image that stops responding to seaside requests and maxes out the CPU. This happens after a random amount of time generally longer than a day. Sometimes I can get it to pop out of the hang by signing in through the RFB server, but sometimes not. In this Pharo-1.3-13315 image (Ubuntu 64bit, Cog 2522 from Eliot's site) I'm using RFB and have applied the fixes described here: https://code.google.com/p/pharo/issues/detail?id=4829#c6 I think that the crash.dmp file shows that the image was stuck trying to create an IdentitySet from an array. Maybe I need to take a sample of the "kill -USR1 <pid>" commands to know for sure. The other thing that's weird is that in the crash.dmp file I don't see the Seaside server process. I'm using Comanche as the server adapter. Is there anything I should look for in my application or image to get more info about the disruption in processing requests? Thanks Paul

2 1