[REBOL] Re: callbacks
From: moliad:gma:il at: 5-Nov-2007 22:31
hi all,
I'm sorry to say I submitted something odd as the memcopy function.
its actually only 0.5% slower than ladislav's but has two differences,
*its returns a binary type
*it should be 100% GC safe
here is the proper version:
memcopy: func [
{copies a region of ram given at address with sizeof length.}
address [integer!]
length [integer!]
/local struct-struct buffer addr
] [
address: make struct! [address [integer!]] reduce [address]
struct-struct: make struct! compose/deep [ struct [struct! [ (head
insert/dup copy [] [c [char]] length)]]] none
addr: copy third struct-struct
change third struct-struct third address
buffer: copy third struct-struct/struct address
change third struct-struct third addr
buffer
]
I realized that its VERY similar to what gregg sent in when I looked at his
submission. its probably equivalent, in fact.
-MAx
On 11/1/07, Gregg Irwin <gregg-pointillistic.com> wrote:
