Maarten Koopmans wrote:

>Hi,
>
>How do I specify a struct! that has a reference to a next entry (linked list) 
>with type itself? 
>
>And how do I intelligently define a complex struct type in a routine 
>definition without doing that inline?  
>
>--Maarten
>  
>
I am still not sure of what you need to achieve, but together with 
Cyphre we wrapped gfl_lib - it is a library allowing to load 350 gfx 
file formats ... The pity is we can't get access to memory buffer, as 
rebol library interface seems to cut image data in a referenced 
structure, once it achieves null char, or so is my theory ...

here is how to handle nested structures ... We are in rebol, right? So 
we can compose things, right? :-)

_GFL_BITMAP: make struct! compose/deep [
    Type [short]
    Origin [short]
    Width [integer!]
    Height [integer!] 
    BytesPerLine [integer!]
    LinePadding [short]
    Reserved [short]
    BytesPerPixel [char!]
    BitsPerComponent [char!]
    Xdpi [short]
    Ydpi [short]
    TransparentIndex [short]
    ColorUsed [integer!]
    ColorMap [integer!]
    Data [char*]
] none


GFL_BITMAP_WRAP: make struct! compose/deep [
        gfl_bitmap [struct! [(first _GFL_BITMAP)]]
] reduce [0 0 0 0 0 0 0 #"^@" #"^@" 0 0 0 0 0 img-buff]

-pekr-


-- 
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the 
subject, without the quotes.

Reply via email to