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