Unneeded right now

This commit is contained in:
Justin Ethier 2017-03-16 20:51:08 +00:00
parent 4834981ba2
commit 32003607fb

View file

@ -1,15 +0,0 @@
(define-library (atomics)
(export
atomic:get
atomic:set!
)
(include-c-header "<ck_pr.h>")
(begin
;TODO: won't work, ints are immutable
;(define-c atomic:fx++
; "(void *data, int argc, closure _, object k, object num)"
; " Cyc_check_fixnum(data, num);
; ck_pr_add_ptr(&num, 2);
; return_closcall1(data, k, num); ")
))