[REBOL] Re: to pair! bug
From: rotenca:telvia:it at: 21-Apr-2002 21:34
Thank you Gabriele for the work.
> symbol! : Gives symbol
Interesting.
> none! : Gives none
Mhhhh, everything can become none?
> image! : Gives image
But always an image sized 0x0 and I do not know ho to change image/size, do
you know it?
---
Ciao
Romano
----- Original Message -----
From: "Gabriele Santilli" <[g--santilli--tiscalinet--it]>
To: "Romano Paolo Tenca" <[rebol-list--rebol--com]>
Sent: Sunday, April 21, 2002 11:59 AM
Subject: [REBOL] Re: to pair! bug
> Hi Romano,
>
> On Sunday, April 21, 2002, 1:16:41 AM, you wrote:
>
> RPT> have you tryied all the datatypes? Pair and time are the only one?
>
> I didn't. But we can try:
>
> (hmm, got a crash; seems like TO does not like some datatypes...
> oh, maybe it was routine! let's avoid types we don't need to check)
>
> >> str: ""
> == ""
> >> for ch #"^(00)" #"^(FE)" 1 [insert tail str ch]
> == ""
> >> datatypes: []
> == []
> >> foreach value second system/words [if datatype? get/any 'value [insert
tail datatypes value]]
> == none
> >> print datatypes
> unset error datatype native action routine op function object struct
> library port any-type any-word any-function number series any-string
> any-block symbol word set-word get-word lit-word refinement none logic
> integer decimal money time date char pair event tuple bitset string issue
> binary file email url image tag block paren path set-path lit-path hash list
> >> problem: reduce [routine! struct! library! port! any-type! any-word!
any-function! number! series! any-string! any-block! event! string!]
> == [routine! struct! library! port! any-type! any-word!
> any-function! number! series! any-string! any-block! event! string!]
> >> foreach datatype datatypes [prin [mold datatype ": "] either error? res:
try [to datatype str] [print "Error."] [print ["Gives" type? :res]]]
> unset! : Error.
> error! : Error.
> datatype! : Error.
> native! : Error.
> action! : Error.
> op! : Error.
> function! : Error.
> object! : Error.
> symbol! : Gives symbol
> word! : Gives word
> set-word! : Gives set-word
> get-word! : Gives get-word
> lit-word! : Gives lit-word
> refinement! : Gives refinement
> none! : Gives none
> logic! : Gives logic
> integer! : Error.
> decimal! : Error.
> money! : Error.
> time! : Gives none
> date! : Error.
> char! : Error.
> pair! : Gives none
> tuple! : Error.
> bitset! : Gives bitset
> issue! : Gives issue
> binary! : Gives binary
> file! : Gives file
> email! : Gives email
> url! : Gives url
> image! : Gives image
> tag! : Gives tag
> block! : Gives block
> paren! : Gives paren
> path! : Gives path
> set-path! : Gives set-path
> lit-path! : Gives lit-path
> hash! : Gives hash
> list! : Error.
>
> To notice:
>
> time! : Gives none
> pair! : Gives none
>
> And:
>
> list! : Error.
>
> while other block types did work (but returned an empty series,
> maybe because confused by the null character).
>> to-block to-string #"^(00)"
== []
>> length? to-block to-string #"^(00)"
== 0
But
>> to-block to-string #"^(01)"
== [-ç]
and