mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-05-12 00:30:20 +02:00
7 lines
268 B
C
7 lines
268 B
C
struct handle { void *unused; };
|
|
|
|
#define HANDLE_TO(T) union { T* v; struct handle handle; }
|
|
#define HANDLE_REF(h) h.v
|
|
#define HANDLE_SET(h,val) do { h.v = val; } while (0)
|
|
#define PUSH_HANDLE(cx, h) do { (void) &h; } while (0)
|
|
#define POP_HANDLE(cx) do { } while (0)
|