Welcome to the CHICKEN Scheme pasting service

Evicting objects and passing the pointer to C? added by zilti on Wed Feb 7 14:43:56 2018

(define attributes (list))
(define obj "Teststring")
(let ((evicted-obj (object-evict obj)))
    (set! attributes (alist-cons test: evicted-obj attributes))
    ((foreign-lambda void "IupSetAttribute" c-string c-pointer) "Title" (object->pointer evicted-obj)))

Your annotation:

Enter a new annotation:

Your nick:
The title of your paste:
Your paste (mandatory) :
Type in the text below:
                           _     _ 
 ___ ___ _ __ ___  _______| |__ | |
/ __/ __| '_ ` _ \|_  / __| '_ \| |
\__ \__ \ | | | | |/ /\__ \ |_) | |
|___/___/_| |_| |_/___|___/_.__/|_|
                                   
Visually impaired? Let me spell it for you (wav file) download WAV