[Openmcl-devel] Atomic instructions
Chun Tian (binghe)
binghe.lisp at gmail.com
Thu Jan 9 05:27:53 PST 2014
Sorry, it doesn't work ... try this: (ccl::%rplaca-conditional x y z). There's also ccl::%rplacd-conditional.
--binghe
Il giorno 09/gen/2014, alle ore 21:21, "Chun Tian (binghe)" <binghe.lisp at gmail.com> ha scritto:
> I think (ccl::conditional-store (car x) y z) should work.
>
> --binghe
>
> Il giorno 09/gen/2014, alle ore 01:59, Taoufik Dachraoui <dachraoui.taoufik at gmail.com> ha scritto:
>
>> Hi
>>
>> Also, besides atomic-push, I would like to do the following atomically:
>>
>> (if (eq (car x) y) (setf (car x) z))
>>
>> How this can de done with CCL using Test and Set instruction of the CPU?
>>
>> If I can implement such things using a lapfunction it would be great; thanks
>> for your help.
>>
>> Kind regards
>> Taoufik
>> _______________________________________________
>> Openmcl-devel mailing list
>> Openmcl-devel at clozure.com
>> http://clozure.com/mailman/listinfo/openmcl-devel
>
More information about the Openmcl-devel
mailing list