Thanks Christophe! I´ll take a look as soon as possible
Sharriff Aina
med.iq information & quality in healthcare AG
CRS - Psy
Sel/SPO, An: [EMAIL PROTECTED]
COUSSEMENT Kopie:
Christophe, CPN Thema: [REBOL] Re: Object "Serialization"
<COUSSEMENT.C@I
TC.mil.be>
Gesendet von:
rebol-bounce@re
bol.com
23.02.01 08:04
Bitte antworten
an rebol-list
Hi Sharriff Aina:
If you're concerned about object serialization, I use it too in my 'OODB
foundations' I'm working on...
Just have a look at http://www.geocities.com/reboldev/ in 'OODB
Foundations', more precisely to the 'store function of the 'dbo object and
at the 'mediator object.
Hope it helps.
chr==
> -----Original Message-----
> From: [EMAIL PROTECTED] [SMTP:[EMAIL PROTECTED]]
> Sent: vrijdag 23 februari 2001 07:36
> To: [EMAIL PROTECTED]
> Subject: [REBOL] Antwort: Re: Object "Serialization"
>
>
> Great script Renaud! this would do till RT builds in Object serialisation
> into REBOL or someone writes a module/ Library..
>
> Regards
>
> Sharriff Aina
>
>
>
>
>
> "Renaud"
>
> <rgombert@esse An: <[EMAIL PROTECTED]>
>
> ntiel.net> Kopie:
>
> Gesendet von: Thema: [REBOL] Re: Object
> "Serialization"
> rebol-bounce@r
>
> ebol.com
>
>
>
>
>
> 22.02.01 23:39
>
> Bitte
>
> antworten an
>
> rebol-list
>
>
>
>
>
>
>
>
>
> Maybe this script could be of some help. It's intended to allow to save
> and
> retrieve a word/value pair in a file.
> It is an early version i've made while learning REBOL.
>
> An example : I put the script in the word 'file, then save this word,
give
> it another value then reload the initial one.
> the scipt is 845 bytes long, and the disk data only 443.
>
> Any comment welcome
>
> Renaud
>
> -----------------------------------------------------------------
> sample session for the example:
> -----------------------------------------------------------------
> >> file: read %scripts/binutils.r
> == {REBOL [
> Title: "Nom du script"
> File: %binutils.r
> Date: 4-Jun-1999
> Author: "Renaud GOMBERT"
> Purpose: "Save...
> >> put-bin file %data.bin
> >> file: 456
> == 456
> >> file
> == 456
> >> get-bin %data.bin
> == {REBOL [
> Title: "Nom du script"
> File: %binutils.r
> Date: 4-Jun-1999
> Author: "Renaud GOMBERT"
> Purpose: "Save...
> >> file
> == {REBOL [
> Title: "Nom du script"
> File: %binutils.r
> Date: 4-Jun-1999
> Author: "Renaud GOMBERT"
> Purpose: "Save...
> >>
>
>
> -----------------------------------------------------------------
> The scipt itself:
> -----------------------------------------------------------------
> REBOL [
> Title: "Nom du script"
> File: %binutils.r
> Date: 4-Jun-1999
> Author: "Renaud GOMBERT"
> Purpose: "Save and retrieve any word/value pair as binary"
> To-do: {
> Make a refinement to do compressions only if needed
> Allow processing of multiple word/value pairs at one time
> }
> Release: 0.0.1
> Category: []
> ]
>
> put-bin: func [ "Save word/value pair as compressed binary"
> 'data [any-type!] "word to process"
> filename [file!] "file to write to"
> /local temp
> ][
> temp: make object! [
> value: get data
> name: data
> ]
> write/binary filename compress to-binary mold temp
> ]
>
> get-bin: func [ "Save word/value pair as compressed binary"
> filename [file!] "file to get word/value from"
> /local temp
> ][
> temp: do decompress read/binary filename
> set temp/name temp/value
> ]
>
>
--------------------------------------------------------------------------
> --
>
> ----
>
> ----- Original Message -----
> From: "GS Jones" <[EMAIL PROTECTED]>
> To: <[EMAIL PROTECTED]>
> Sent: Thursday, February 22, 2001 11:32 PM
> Subject: [REBOL] Re: Object "Serialization"
>
>
> > > > > In a separate thread, a question was asked about serialization of
> > > > > objects by Sharriff Aina. I had a similar question in mind and
> > was
> > > > > hoping for an answer. Since the thread had gotten a bit off
> > topic,
> > > I'm
> > > > > reposting essentially the same question in this separate thread.
> > > > >
> > > > > To date, when I want to save an object, I've been using 'save.
> > Then
> > > > > when I need the object back, I use 'read and then 'do the object.
> > > > >
> > > > > For example:
> > > > >
> > > > > data: make object! [
> > > > > name: "Joe"
> > > > > ]
> > > > >
> > > > > save %my-object.r data
> > > > >
> > > > > ;... later i need the object ...
> > > > > data: read %my-object.r
> > > > > data: do data
> > > > > print data/name
> > > >
> > > > use 'load instead of 'read? Then you don't need to 'do the 'data
...
> > > > -pekr-
> > >
> > > Thanks, that is a good point!
> > > Scott
> >
> > Actually, when I tried it, simply using 'load did not re-initialize the
> > object (unless I am missing some additional subtle point). I played
> > with several additional variations, with the same conclusions. So I
> > guess the way I've been doing it will have to be good enough. It still
> > seems as though there should be a more seemless and coherent way to
> > serialize the object.
> >
> > Thanks for your attention, pekr.
> > --Scott
> >
> > --
> > To unsubscribe from this list, please send an email to
> > [EMAIL PROTECTED] with "unsubscribe" in the
> > subject, without the quotes.
> >
> >
>
> --
> To unsubscribe from this list, please send an email to
> [EMAIL PROTECTED] with "unsubscribe" in the
> subject, without the quotes.
>
>
>
>
>
> --
> To unsubscribe from this list, please send an email to
> [EMAIL PROTECTED] with "unsubscribe" in the
> subject, without the quotes.
--
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the
subject, without the quotes.
--
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the
subject, without the quotes.
