18 lines
422 B
Common Lisp
18 lines
422 B
Common Lisp
#include <clc/clc.h>
|
|
#include <clc/utils.h>
|
|
|
|
#define __CLC_BODY <frexp.inc>
|
|
#define __CLC_ADDRESS_SPACE private
|
|
#include <clc/math/gentype.inc>
|
|
#undef __CLC_ADDRESS_SPACE
|
|
|
|
#define __CLC_BODY <frexp.inc>
|
|
#define __CLC_ADDRESS_SPACE global
|
|
#include <clc/math/gentype.inc>
|
|
#undef __CLC_ADDRESS_SPACE
|
|
|
|
#define __CLC_BODY <frexp.inc>
|
|
#define __CLC_ADDRESS_SPACE local
|
|
#include <clc/math/gentype.inc>
|
|
#undef __CLC_ADDRESS_SPACE
|