mirror of
https://github.com/idris-lang/Idris2.git
synced 2024-11-28 11:05:17 +03:00
1fac812435
* remove `Value.payload` field * `IDRIS2_NEW_VALUE` macro now allocates the size needed for the struct
38 lines
1.1 KiB
C
38 lines
1.1 KiB
C
#pragma once
|
|
|
|
#include "cBackend.h"
|
|
|
|
Value *newValue(size_t size);
|
|
Value *newReference(Value *source);
|
|
void removeReference(Value *source);
|
|
|
|
#define IDRIS2_NEW_VALUE(t) ((t*) newValue(sizeof(t)))
|
|
|
|
Value_Arglist *newArglist(int missing, int total);
|
|
Value_Constructor *newConstructor(int total, int tag, const char *name);
|
|
|
|
// copies arglist, no pointer bending
|
|
Value_Closure *makeClosureFromArglist(fun_ptr_t f, Value_Arglist *);
|
|
|
|
Value_Double *makeDouble(double d);
|
|
Value_Char *makeChar(char d);
|
|
Value_Bits8 *makeBits8(uint8_t i);
|
|
Value_Bits16 *makeBits16(uint16_t i);
|
|
Value_Bits32 *makeBits32(uint32_t i);
|
|
Value_Bits64 *makeBits64(uint64_t i);
|
|
Value_Int8 *makeInt8(int8_t i);
|
|
Value_Int16 *makeInt16(int16_t i);
|
|
Value_Int32 *makeInt32(int32_t i);
|
|
Value_Int64 *makeInt64(int64_t i);
|
|
Value_Int8 *makeBool(int p);
|
|
Value_Integer *makeInteger();
|
|
Value_Integer *makeIntegerLiteral(char *i);
|
|
Value_String *makeEmptyString(size_t l);
|
|
Value_String *makeString(char *);
|
|
|
|
Value_Pointer *makePointer(void *);
|
|
Value_GCPointer *makeGCPointer(void *ptr_Raw, Value_Closure *onCollectFct);
|
|
Value_Buffer *makeBuffer(void *buf);
|
|
Value_Array *makeArray(int length);
|
|
Value_World *makeWorld(void);
|