Samples of PIPOs

useful PIPOs!

　ObjectParser 1.2はSmalltalkAgentsで作成されたインスタンスを保存・再生するクラスライブラリです。AgentsはADTでアプリケーションにするとインスタンスをPIPOによって保存・再生することができないので、その時に使います。ObjectParserは以下のオブジェクトを保存、再生することが出来ます。 Nil Symbol String Number Point List Dictionary Boolean Time Color Text Picture Rectangle ScrapStyle Text FileSpecifier------- sample source --------------sample := (Dictionary new) at:#name put:'sima'; at:#misc put:{1. (Time now).}. "message reciever is menuBar"Q := (ObjectParser new) reciever:MenuBar."genarate code"code:= Q generateCodeOf:sample."evaluate code"^aObject:= Q evaluate: code-----------------------------------ここで、sampleは保存したいオブジェクトです。メッセージを表示したい場合には、recieverにオブジェクトを指定します。この場合はメニューバーです（recieverで指定されるオブジェクトは#message:メソッドを持っていることが必要です）。　codeにはObjectParserが生成した文字列が返されます。 (this code generated by ObjectParser ver 1.0)SYM:someSYM:nameLST:1. 2. NMB:1TIM:Fri 09/20/1996 08:51:45 PMLST:4. 5. STR:simaLST:6. 7. DCT:3@8　ObjectParserのインスタンスに#evaluate:を送ると、元のインスタンスが再生されます。

Download ObjectParser.st(59Kb)