Start writing doxygen/javadoc-style doc comments for C API
This commit is contained in:
parent
d112107edc
commit
076b702afa
37
src/debug.h
37
src/debug.h
@ -4,7 +4,44 @@
|
|||||||
#include "chunk.h"
|
#include "chunk.h"
|
||||||
#include "object.h"
|
#include "object.h"
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Print a disassembly of 'func' to the stream 'f'.
|
||||||
|
*
|
||||||
|
* Generates and prints a bytecode disassembly of the code object 'func',
|
||||||
|
* writing it to the requested stream.
|
||||||
|
*
|
||||||
|
* @param f Stream to write to.
|
||||||
|
* @param func Code object to disassemble.
|
||||||
|
* @param name Function name to display in disassembly output.
|
||||||
|
*/
|
||||||
extern void krk_disassembleChunk(FILE * f, KrkFunction * func, const char * name);
|
extern void krk_disassembleChunk(FILE * f, KrkFunction * func, const char * name);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Print a disassembly of a single opcode instruction.
|
||||||
|
*
|
||||||
|
* Generates and prints a bytecode disassembly for one instruction from
|
||||||
|
* the code object 'func' at byte offset 'offset', printing the result to
|
||||||
|
* the requested stream and returning the size of the instruction.
|
||||||
|
*
|
||||||
|
* @param f Stream to write to.
|
||||||
|
* @param func Code object to disassemble.
|
||||||
|
* @param offset Byte offset of the instruction to disassemble.
|
||||||
|
* @return The size of the instruction in bytes.
|
||||||
|
*/
|
||||||
extern size_t krk_disassembleInstruction(FILE * f, KrkFunction * func, size_t offset);
|
extern size_t krk_disassembleInstruction(FILE * f, KrkFunction * func, size_t offset);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Obtain the line number for a byte offset into a bytecode chunk.
|
||||||
|
*
|
||||||
|
* Scans the line mapping table for the given chunk to find the
|
||||||
|
* correct line number from the original source file for the instruction
|
||||||
|
* at byte index 'offset'.
|
||||||
|
*
|
||||||
|
* @param chunk Bytecode chunk containing the instruction.
|
||||||
|
* @param offset Byte offset of the instruction to locate.
|
||||||
|
* @return Line number, 1-indexed.
|
||||||
|
*/
|
||||||
extern size_t krk_lineNumber(KrkChunk * chunk, size_t offset);
|
extern size_t krk_lineNumber(KrkChunk * chunk, size_t offset);
|
||||||
|
|
||||||
|
/* Internal stuff */
|
||||||
extern void _createAndBind_disMod(void);
|
extern void _createAndBind_disMod(void);
|
||||||
|
79
src/object.h
79
src/object.h
@ -221,8 +221,83 @@ static inline int isObjType(KrkValue value, ObjType type) {
|
|||||||
return IS_OBJECT(value) && AS_OBJECT(value)->type == type;
|
return IS_OBJECT(value) && AS_OBJECT(value)->type == type;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Yield ownership of a C string to the GC and obtain a string object.
|
||||||
|
*
|
||||||
|
* Creates a string object represented by the characters in 'chars' and of
|
||||||
|
* length 'length'. The source string must be nil-terminated and must
|
||||||
|
* remain valid for the lifetime of the object, as its ownership is yielded
|
||||||
|
* to the GC. Useful for strings which were allocated on the heap by
|
||||||
|
* other mechanisms.
|
||||||
|
*
|
||||||
|
* 'chars' must be a nil-terminated C string representing a UTF-8
|
||||||
|
* character sequence.
|
||||||
|
*
|
||||||
|
* @param chars C string to take ownership of.
|
||||||
|
* @param length Length of the C string.
|
||||||
|
* @return A string object.
|
||||||
|
*/
|
||||||
extern KrkString * krk_takeString(char * chars, size_t length);
|
extern KrkString * krk_takeString(char * chars, size_t length);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Obtain a string object representation of the given C string.
|
||||||
|
*
|
||||||
|
* Converts the C string 'chars' into a string object by checking the
|
||||||
|
* string table for it. If the string table does not have an equivalent
|
||||||
|
* string, a new one will be created by copying 'chars'.
|
||||||
|
*
|
||||||
|
* 'chars' must be a nil-terminated C string representing a UTF-8
|
||||||
|
* character sequence.
|
||||||
|
*
|
||||||
|
* @param chars C string to convert to a string object.
|
||||||
|
* @param length Length of the C string.
|
||||||
|
* @return A string object.
|
||||||
|
*/
|
||||||
extern KrkString * krk_copyString(const char * chars, size_t length);
|
extern KrkString * krk_copyString(const char * chars, size_t length);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Ensure that a codepoint representation of a string is available.
|
||||||
|
*
|
||||||
|
* Obtain an untyped pointer to the codepoint representation of a string.
|
||||||
|
* If the string does not have a codepoint representation allocated, it will
|
||||||
|
* be generated by this function and remain with the string for the duration
|
||||||
|
* of its lifetime.
|
||||||
|
*
|
||||||
|
* @param string String to obtain the codepoint representation of.
|
||||||
|
* @return A pointer to the bytes of the codepoint representation.
|
||||||
|
*/
|
||||||
|
extern void * krk_unicodeString(KrkString * string);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Obtain the codepoint at a given index in a string.
|
||||||
|
*
|
||||||
|
* This is a convenience function which ensures that a Unicode codepoint
|
||||||
|
* representation has been generated and returns the codepoint value at
|
||||||
|
* the requested index. If you need to find multiple codepoints, it
|
||||||
|
* is recommended that you use the KRK_STRING_FAST macro after calling
|
||||||
|
* krk_unicodeString instead.
|
||||||
|
*
|
||||||
|
* @note This function does not perform any bounds checking.
|
||||||
|
*
|
||||||
|
* @param string String to index into.
|
||||||
|
* @param index Offset of the codepoint to obtain.
|
||||||
|
* @return Integer representation of the codepoint at the requested index.
|
||||||
|
*/
|
||||||
|
extern uint32_t krk_unicodeCodepoint(KrkString * string, size_t index);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Convert an integer codepoint to a UTF-8 byte representation.
|
||||||
|
*
|
||||||
|
* Converts a single codepoint to a sequence of bytes containing the
|
||||||
|
* UTF-8 representation. 'out' must be allocated by the caller.
|
||||||
|
*
|
||||||
|
* @param value Codepoint to encode.
|
||||||
|
* @param out Array to write UTF-8 sequence into.
|
||||||
|
* @return The length of the UTF-8 sequence, in bytes.
|
||||||
|
*/
|
||||||
|
extern size_t krk_codepointToBytes(krk_integer_type value, unsigned char * out);
|
||||||
|
|
||||||
|
/* Internal stuff. */
|
||||||
extern KrkFunction * krk_newFunction(void);
|
extern KrkFunction * krk_newFunction(void);
|
||||||
extern KrkNative * krk_newNative(NativeFn function, const char * name, int type);
|
extern KrkNative * krk_newNative(NativeFn function, const char * name, int type);
|
||||||
extern KrkClosure * krk_newClosure(KrkFunction * function);
|
extern KrkClosure * krk_newClosure(KrkFunction * function);
|
||||||
@ -233,9 +308,6 @@ extern KrkBoundMethod * krk_newBoundMethod(KrkValue receiver, KrkObj * method);
|
|||||||
extern KrkTuple * krk_newTuple(size_t length);
|
extern KrkTuple * krk_newTuple(size_t length);
|
||||||
extern KrkProperty * krk_newProperty(KrkValue method);
|
extern KrkProperty * krk_newProperty(KrkValue method);
|
||||||
|
|
||||||
extern void * krk_unicodeString(KrkString * string);
|
|
||||||
extern uint32_t krk_unicodeCodepoint(KrkString * string, size_t index);
|
|
||||||
|
|
||||||
#define KRK_STRING_FAST(string,offset) (uint32_t)\
|
#define KRK_STRING_FAST(string,offset) (uint32_t)\
|
||||||
(string->type <= 1 ? ((uint8_t*)string->codes)[offset] : \
|
(string->type <= 1 ? ((uint8_t*)string->codes)[offset] : \
|
||||||
(string->type == 2 ? ((uint16_t*)string->codes)[offset] : \
|
(string->type == 2 ? ((uint16_t*)string->codes)[offset] : \
|
||||||
@ -245,6 +317,5 @@ extern uint32_t krk_unicodeCodepoint(KrkString * string, size_t index);
|
|||||||
|
|
||||||
extern KrkBytes * krk_newBytes(size_t length, uint8_t * source);
|
extern KrkBytes * krk_newBytes(size_t length, uint8_t * source);
|
||||||
extern void krk_bytesUpdateHash(KrkBytes * bytes);
|
extern void krk_bytesUpdateHash(KrkBytes * bytes);
|
||||||
extern size_t krk_codepointToBytes(krk_integer_type value, unsigned char * out);
|
|
||||||
|
|
||||||
extern void krk_tupleUpdateHash(KrkTuple * self);
|
extern void krk_tupleUpdateHash(KrkTuple * self);
|
||||||
|
101
src/table.h
101
src/table.h
@ -23,12 +23,113 @@ typedef struct {
|
|||||||
KrkTableEntry * entries;
|
KrkTableEntry * entries;
|
||||||
} KrkTable;
|
} KrkTable;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Initialize a hash table.
|
||||||
|
*
|
||||||
|
* This should be called for any new hash table, especially ones
|
||||||
|
* initialized in heap or stack space, to set up the capacity, count
|
||||||
|
* and initial entries pointer.
|
||||||
|
*
|
||||||
|
* @param table Hash table to initialize.
|
||||||
|
*/
|
||||||
extern void krk_initTable(KrkTable * table);
|
extern void krk_initTable(KrkTable * table);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Release resources associated with a hash table.
|
||||||
|
*
|
||||||
|
* Frees the entries array for the table and resets count and capacity.
|
||||||
|
*
|
||||||
|
* @param table Hash table to release.
|
||||||
|
*/
|
||||||
extern void krk_freeTable(KrkTable * table);
|
extern void krk_freeTable(KrkTable * table);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Add all key-value pairs from 'from' into 'to'.
|
||||||
|
*
|
||||||
|
* Copies each key-value pair from one hash table to another. If a key
|
||||||
|
* from 'from' already exists in 'to', the existing value in 'to' will be
|
||||||
|
* overwritten with the value from 'from'.
|
||||||
|
*
|
||||||
|
* @param from Source table.
|
||||||
|
* @param to Destination table.
|
||||||
|
*/
|
||||||
extern void krk_tableAddAll(KrkTable * from, KrkTable * to);
|
extern void krk_tableAddAll(KrkTable * from, KrkTable * to);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Find a character sequence in the string interning table.
|
||||||
|
*
|
||||||
|
* Scans through the entries in a given table - usually vm.strings - to find
|
||||||
|
* an entry equivalent to the string specified by the 'chars' and 'length'
|
||||||
|
* parameters, using the 'hash' parameter to speed up lookup.
|
||||||
|
*
|
||||||
|
* @param chars C array of chars representing the string.
|
||||||
|
* @param length Length of the string.
|
||||||
|
* @param hash Precalculated hash value for the string.
|
||||||
|
* @return If the string was found, the string object representation, else NULL.
|
||||||
|
*/
|
||||||
extern KrkString * krk_tableFindString(KrkTable * table, const char * chars, size_t length, uint32_t hash);
|
extern KrkString * krk_tableFindString(KrkTable * table, const char * chars, size_t length, uint32_t hash);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Assign a value to a key in a table.
|
||||||
|
*
|
||||||
|
* Inserts the key-value pair specified by 'key' and 'value' into the hash
|
||||||
|
* table 'table', replacing any value that was already preseng with the
|
||||||
|
* same key.
|
||||||
|
*
|
||||||
|
* @param table Table to assign to.
|
||||||
|
* @param key Key to assign.
|
||||||
|
* @param value Value to assign to the key.
|
||||||
|
* @return 0 if the key was already present and has been overwritten, 1 if the key is new to the table.
|
||||||
|
*/
|
||||||
extern int krk_tableSet(KrkTable * table, KrkValue key, KrkValue value);
|
extern int krk_tableSet(KrkTable * table, KrkValue key, KrkValue value);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Obtain the value associated with a key in a table.
|
||||||
|
*
|
||||||
|
* Scans the table 'table' for the key 'key' and, if found, outputs
|
||||||
|
* the associated value to *value. If the key is not found, then
|
||||||
|
* *value will not be changed.
|
||||||
|
*
|
||||||
|
* @param table Table to look up.
|
||||||
|
* @param key Key to look for.
|
||||||
|
* @param value Output pointer to place resulting value in.
|
||||||
|
* @return 0 if the key was not found, 1 if it was.
|
||||||
|
*/
|
||||||
extern int krk_tableGet(KrkTable * table, KrkValue key, KrkValue * value);
|
extern int krk_tableGet(KrkTable * table, KrkValue key, KrkValue * value);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Remove a key from a hash table.
|
||||||
|
*
|
||||||
|
* Scans the table 'table' for the key 'key' and, if found, removes
|
||||||
|
* the entry, replacing it with a tombstone value.
|
||||||
|
*
|
||||||
|
* @param table Table to delete from.
|
||||||
|
* @param key Key to delete.
|
||||||
|
* @return 1 if the value was found and deleted, 0 if it was not present.
|
||||||
|
*/
|
||||||
extern int krk_tableDelete(KrkTable * table, KrkValue key);
|
extern int krk_tableDelete(KrkTable * table, KrkValue key);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Internal table scan function.
|
||||||
|
*
|
||||||
|
* Scans through the the entry array 'entries' to find the appropriate entry
|
||||||
|
* for 'key', return a pointer to the entry, which may be or may not have
|
||||||
|
* an associated pair.
|
||||||
|
*
|
||||||
|
* @param entries Table entry array to scan.
|
||||||
|
* @param capacity Size of the table entry array, in entries.
|
||||||
|
* @param key Key to locate.
|
||||||
|
* @return A pointer to the entry for 'key'.
|
||||||
|
*/
|
||||||
extern KrkTableEntry * krk_findEntry(KrkTableEntry * entries, size_t capacity, KrkValue key);
|
extern KrkTableEntry * krk_findEntry(KrkTableEntry * entries, size_t capacity, KrkValue key);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Calculate the hash for a value.
|
||||||
|
*
|
||||||
|
* Retreives or calculates the hash value for 'value'.
|
||||||
|
*
|
||||||
|
* @param value Value to hash.
|
||||||
|
* @return An unsigned 32-bit hash value.
|
||||||
|
*/
|
||||||
extern uint32_t krk_hashValue(KrkValue value);
|
extern uint32_t krk_hashValue(KrkValue value);
|
||||||
|
|
||||||
|
@ -47,7 +47,7 @@ KRK_FUNC(current_thread,{
|
|||||||
static volatile int _threadLock = 0;
|
static volatile int _threadLock = 0;
|
||||||
static void * _startthread(void * _threadObj) {
|
static void * _startthread(void * _threadObj) {
|
||||||
memset(&krk_currentThread, 0, sizeof(KrkThreadState));
|
memset(&krk_currentThread, 0, sizeof(KrkThreadState));
|
||||||
krk_currentThread.frames = calloc(FRAMES_MAX,sizeof(CallFrame));
|
krk_currentThread.frames = calloc(KRK_CALL_FRAMES_MAX,sizeof(CallFrame));
|
||||||
|
|
||||||
_obtain_lock(_threadLock);
|
_obtain_lock(_threadLock);
|
||||||
if (vm.threads->next) {
|
if (vm.threads->next) {
|
||||||
|
45
src/util.h
45
src/util.h
@ -95,12 +95,21 @@ static inline const char * _method_name(const char * func) {
|
|||||||
#define BIND_PROP(klass,method) do { krk_defineNativeProperty(&klass->fields, #method, _ ## klass ## _ ## method); } while (0)
|
#define BIND_PROP(klass,method) do { krk_defineNativeProperty(&klass->fields, #method, _ ## klass ## _ ## method); } while (0)
|
||||||
#define BIND_FUNC(module,func) do { krk_defineNative(&module->fields, #func, _krk_ ## func); } while (0)
|
#define BIND_FUNC(module,func) do { krk_defineNative(&module->fields, #func, _krk_ ## func); } while (0)
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Inline flexible string array.
|
||||||
|
*/
|
||||||
struct StringBuilder {
|
struct StringBuilder {
|
||||||
size_t capacity;
|
size_t capacity;
|
||||||
size_t length;
|
size_t length;
|
||||||
char * bytes;
|
char * bytes;
|
||||||
};
|
};
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Add a character to the end of a string builder.
|
||||||
|
*
|
||||||
|
* @param sb String builder to append to.
|
||||||
|
* @param c Character to append.
|
||||||
|
*/
|
||||||
static inline void pushStringBuilder(struct StringBuilder * sb, char c) {
|
static inline void pushStringBuilder(struct StringBuilder * sb, char c) {
|
||||||
if (sb->capacity < sb->length + 1) {
|
if (sb->capacity < sb->length + 1) {
|
||||||
size_t old = sb->capacity;
|
size_t old = sb->capacity;
|
||||||
@ -110,6 +119,13 @@ static inline void pushStringBuilder(struct StringBuilder * sb, char c) {
|
|||||||
sb->bytes[sb->length++] = c;
|
sb->bytes[sb->length++] = c;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Append a string to the end of a string builder.
|
||||||
|
*
|
||||||
|
* @param sb String builder to append to.
|
||||||
|
* @param str C string to add.
|
||||||
|
* @param len Length of the C string.
|
||||||
|
*/
|
||||||
static inline void pushStringBuilderStr(struct StringBuilder * sb, char *str, size_t len) {
|
static inline void pushStringBuilderStr(struct StringBuilder * sb, char *str, size_t len) {
|
||||||
if (sb->capacity < sb->length + len) {
|
if (sb->capacity < sb->length + len) {
|
||||||
while (sb->capacity < sb->length + len) {
|
while (sb->capacity < sb->length + len) {
|
||||||
@ -123,18 +139,47 @@ static inline void pushStringBuilderStr(struct StringBuilder * sb, char *str, si
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Finalize a string builder into a string object.
|
||||||
|
*
|
||||||
|
* Creates a string object from the contents of the string builder and
|
||||||
|
* frees the space allocated for the builder, returning a value representing
|
||||||
|
* the newly created string object.
|
||||||
|
*
|
||||||
|
* @param sb String builder to finalize.
|
||||||
|
* @return A value representing a string object.
|
||||||
|
*/
|
||||||
static inline KrkValue finishStringBuilder(struct StringBuilder * sb) {
|
static inline KrkValue finishStringBuilder(struct StringBuilder * sb) {
|
||||||
KrkValue out = OBJECT_VAL(krk_copyString(sb->bytes, sb->length));
|
KrkValue out = OBJECT_VAL(krk_copyString(sb->bytes, sb->length));
|
||||||
FREE_ARRAY(char,sb->bytes, sb->capacity);
|
FREE_ARRAY(char,sb->bytes, sb->capacity);
|
||||||
return out;
|
return out;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Finalize a string builder in a bytes object.
|
||||||
|
*
|
||||||
|
* Converts the contents of a string builder into a bytes object and
|
||||||
|
* frees the space allocated for the builder.
|
||||||
|
*
|
||||||
|
* @param sb String builder to finalize.
|
||||||
|
* @return A value representing a bytes object.
|
||||||
|
*/
|
||||||
static inline KrkValue finishStringBuilderBytes(struct StringBuilder * sb) {
|
static inline KrkValue finishStringBuilderBytes(struct StringBuilder * sb) {
|
||||||
KrkValue out = OBJECT_VAL(krk_newBytes(sb->length, (uint8_t*)sb->bytes));
|
KrkValue out = OBJECT_VAL(krk_newBytes(sb->length, (uint8_t*)sb->bytes));
|
||||||
FREE_ARRAY(char,sb->bytes, sb->capacity);
|
FREE_ARRAY(char,sb->bytes, sb->capacity);
|
||||||
return out;
|
return out;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Discard the contents of a string builder.
|
||||||
|
*
|
||||||
|
* Frees the resources allocated for the string builder without converting
|
||||||
|
* it to a string or bytes object. Call this when an error has been encountered
|
||||||
|
* and the contents of a string builder are no longer needed.
|
||||||
|
*
|
||||||
|
* @param sb String builder to discard.
|
||||||
|
* @return None, as a convenience.
|
||||||
|
*/
|
||||||
static inline KrkValue discardStringBuilder(struct StringBuilder * sb) {
|
static inline KrkValue discardStringBuilder(struct StringBuilder * sb) {
|
||||||
FREE_ARRAY(char,sb->bytes, sb->capacity);
|
FREE_ARRAY(char,sb->bytes, sb->capacity);
|
||||||
return NONE_VAL();
|
return NONE_VAL();
|
||||||
|
156
src/value.h
156
src/value.h
@ -3,9 +3,24 @@
|
|||||||
#include <stdio.h>
|
#include <stdio.h>
|
||||||
#include "kuroko.h"
|
#include "kuroko.h"
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Base structure of all heap objects.
|
||||||
|
*
|
||||||
|
* KrkObj is the base type of all objects stored on the heap and
|
||||||
|
* managed by the garbage collector.
|
||||||
|
*/
|
||||||
typedef struct Obj KrkObj;
|
typedef struct Obj KrkObj;
|
||||||
typedef struct ObjString KrkString;
|
typedef struct ObjString KrkString;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Tag enum for basic value types.
|
||||||
|
*
|
||||||
|
* Value types are tagged unions of a handful of small
|
||||||
|
* types represented directly on the stack: Integers,
|
||||||
|
* double-precision floating point values, booleans,
|
||||||
|
* exception handler references, complex function argument
|
||||||
|
* processing sentinels, object reference pointers, and None.
|
||||||
|
*/
|
||||||
typedef enum {
|
typedef enum {
|
||||||
VAL_NONE,
|
VAL_NONE,
|
||||||
VAL_BOOLEAN,
|
VAL_BOOLEAN,
|
||||||
@ -14,14 +29,36 @@ typedef enum {
|
|||||||
VAL_HANDLER,
|
VAL_HANDLER,
|
||||||
VAL_OBJECT,
|
VAL_OBJECT,
|
||||||
VAL_KWARGS,
|
VAL_KWARGS,
|
||||||
/* More here later */
|
|
||||||
} KrkValueType;
|
} KrkValueType;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Stack value representation of a 'with' or 'try' block.
|
||||||
|
*
|
||||||
|
* When a 'with' or 'try' block is entered, a handler value is
|
||||||
|
* created on the stack representing the type (with, try) and the
|
||||||
|
* jump target to leave the block (entering the 'except' block of
|
||||||
|
* a 'try', if present, or calling the __exit__ method of an object
|
||||||
|
* __enter__'d by a 'with' block). When the relevant conditions are
|
||||||
|
* triggered in the VM, the stack will be scanned from top to bottom
|
||||||
|
* to look for these values.
|
||||||
|
*/
|
||||||
typedef struct {
|
typedef struct {
|
||||||
unsigned short type;
|
unsigned short type;
|
||||||
unsigned short target;
|
unsigned short target;
|
||||||
} KrkJumpTarget;
|
} KrkJumpTarget;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Stack reference or primative value.
|
||||||
|
*
|
||||||
|
* This type stores a stack reference to an object, or the contents of
|
||||||
|
* a primitive type. Each VM thread's stack consists of an array of
|
||||||
|
* these values, and they are generally passed around in the VM through
|
||||||
|
* direct copying rather than as pointers, avoiding the need to track
|
||||||
|
* memory used by them.
|
||||||
|
*
|
||||||
|
* Each value is a tagged union with a type (see the enum KrkValueType)
|
||||||
|
* and its contents.
|
||||||
|
*/
|
||||||
typedef struct {
|
typedef struct {
|
||||||
KrkValueType type;
|
KrkValueType type;
|
||||||
union {
|
union {
|
||||||
@ -33,6 +70,109 @@ typedef struct {
|
|||||||
} as;
|
} as;
|
||||||
} KrkValue;
|
} KrkValue;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Flexible vector of stack references.
|
||||||
|
*
|
||||||
|
* Value Arrays provide a resizable collection of values and are the
|
||||||
|
* backbone of lists and tuples.
|
||||||
|
*/
|
||||||
|
typedef struct {
|
||||||
|
size_t capacity; /**< Available allocated space. */
|
||||||
|
size_t count; /**< Current number of used slots. */
|
||||||
|
KrkValue * values; /**< Pointer to heap-allocated storage. */
|
||||||
|
} KrkValueArray;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Initialize a value array.
|
||||||
|
*
|
||||||
|
* This should be called for any new value array, especially ones
|
||||||
|
* initialized in heap or stack space, to set up the capacity, count
|
||||||
|
* and initial value pointer.
|
||||||
|
*
|
||||||
|
* @param array Value array to initialize.
|
||||||
|
*/
|
||||||
|
extern void krk_initValueArray(KrkValueArray * array);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Add a value to a value array.
|
||||||
|
*
|
||||||
|
* Appends 'value' to the end of the given array, adjusting count values
|
||||||
|
* and resizing as necessary.
|
||||||
|
*
|
||||||
|
* @param array Array to append to.
|
||||||
|
* @param value Value to append to array.
|
||||||
|
*/
|
||||||
|
extern void krk_writeValueArray(KrkValueArray * array, KrkValue value);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Release relesources used by a value array.
|
||||||
|
*
|
||||||
|
* Frees the storage associated with a given value array and resets
|
||||||
|
* its capacity and count. Does not directly free resources associated
|
||||||
|
* with heap objects referenced by the values in this array: The GC
|
||||||
|
* is responsible for taking care of that.
|
||||||
|
*
|
||||||
|
* @param array Array to release.
|
||||||
|
*/
|
||||||
|
extern void krk_freeValueArray(KrkValueArray * array);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Print a string representation of a value.
|
||||||
|
*
|
||||||
|
* Print a string representation of 'value' to the stream 'f'.
|
||||||
|
* For primitives, performs appropriate formatting. For objects,
|
||||||
|
* this will call __str__ on the object's representative type.
|
||||||
|
* If the type does not have a __str__ method, __repr__ will be
|
||||||
|
* tried before falling back to krk_typeName to directly print
|
||||||
|
* the name of the class with no information on the value.
|
||||||
|
*
|
||||||
|
* This function provides the backend for the print() built-in.
|
||||||
|
*
|
||||||
|
* @param f Stream to write to.
|
||||||
|
* @param value Value to display.
|
||||||
|
*/
|
||||||
|
extern void krk_printValue(FILE * f, KrkValue value);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Print a value without calling the VM.
|
||||||
|
*
|
||||||
|
* Print a string representation of 'value' to the stream 'f',
|
||||||
|
* avoiding calls to managed code by using simplified representations
|
||||||
|
* where necessary. This is intended for use in debugging code, such
|
||||||
|
* as during disassembly, or when printing values in an untrusted context.
|
||||||
|
*
|
||||||
|
* @note This function will truncate long strings and print them in a form
|
||||||
|
* closer to the 'repr()' representation, with escaped bytes, rather
|
||||||
|
* than directly printing them to the stream.
|
||||||
|
*
|
||||||
|
* @param f Stream to write to.
|
||||||
|
* @param value Value to display.
|
||||||
|
*/
|
||||||
|
extern void krk_printValueSafe(FILE * f, KrkValue value);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Compare two values for equality.
|
||||||
|
*
|
||||||
|
* Performs a relaxed equality comparison between two values,
|
||||||
|
* check for equivalence by contents. This may call managed
|
||||||
|
* code to run __eq__ methods.
|
||||||
|
*
|
||||||
|
* @return 1 if values are equivalent, 0 otherwise.
|
||||||
|
*/
|
||||||
|
extern int krk_valuesEqual(KrkValue a, KrkValue b);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Compare two values by identity.
|
||||||
|
*
|
||||||
|
* Performs a strict comparison between two values, comparing
|
||||||
|
* their identities. For primitive values, this is generally
|
||||||
|
* the same as comparing by equality. For objects, this compares
|
||||||
|
* pointer values directly.
|
||||||
|
*
|
||||||
|
* @return 1 if values represent the same object or value, 0 otherwise.
|
||||||
|
*/
|
||||||
|
extern int krk_valuesSame(KrkValue a, KrkValue b);
|
||||||
|
|
||||||
#define BOOLEAN_VAL(value) ((KrkValue){VAL_BOOLEAN, {.boolean = value}})
|
#define BOOLEAN_VAL(value) ((KrkValue){VAL_BOOLEAN, {.boolean = value}})
|
||||||
#define NONE_VAL(value) ((KrkValue){VAL_NONE, {.integer = 0}})
|
#define NONE_VAL(value) ((KrkValue){VAL_NONE, {.integer = 0}})
|
||||||
#define INTEGER_VAL(value) ((KrkValue){VAL_INTEGER, {.integer = value}})
|
#define INTEGER_VAL(value) ((KrkValue){VAL_INTEGER, {.integer = value}})
|
||||||
@ -58,17 +198,3 @@ typedef struct {
|
|||||||
#define IS_TRY_HANDLER(value) (IS_HANDLER(value) && AS_HANDLER(value).type == OP_PUSH_TRY)
|
#define IS_TRY_HANDLER(value) (IS_HANDLER(value) && AS_HANDLER(value).type == OP_PUSH_TRY)
|
||||||
#define IS_WITH_HANDLER(value) (IS_HANDLER(value) && AS_HANDLER(value).type == OP_PUSH_WITH)
|
#define IS_WITH_HANDLER(value) (IS_HANDLER(value) && AS_HANDLER(value).type == OP_PUSH_WITH)
|
||||||
|
|
||||||
typedef struct {
|
|
||||||
size_t capacity;
|
|
||||||
size_t count;
|
|
||||||
KrkValue * values;
|
|
||||||
} KrkValueArray;
|
|
||||||
|
|
||||||
extern void krk_initValueArray(KrkValueArray * array);
|
|
||||||
extern void krk_writeValueArray(KrkValueArray * array, KrkValue value);
|
|
||||||
extern void krk_freeValueArray(KrkValueArray * array);
|
|
||||||
extern void krk_printValue(FILE * f, KrkValue value);
|
|
||||||
extern void krk_printValueSafe(FILE * f, KrkValue value);
|
|
||||||
extern int krk_valuesEqual(KrkValue a, KrkValue b);
|
|
||||||
extern int krk_valuesSame(KrkValue a, KrkValue b);
|
|
||||||
|
|
||||||
|
4
src/vm.c
4
src/vm.c
@ -790,7 +790,7 @@ _finishKwarg:
|
|||||||
krk_push(KWARGS_VAL(0));
|
krk_push(KWARGS_VAL(0));
|
||||||
argCount++;
|
argCount++;
|
||||||
}
|
}
|
||||||
if (krk_currentThread.frameCount == FRAMES_MAX) {
|
if (krk_currentThread.frameCount == KRK_CALL_FRAMES_MAX) {
|
||||||
krk_runtimeError(vm.exceptions->baseException, "Too many call frames.");
|
krk_runtimeError(vm.exceptions->baseException, "Too many call frames.");
|
||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
@ -1118,7 +1118,7 @@ void krk_initVM(int flags) {
|
|||||||
|
|
||||||
/* Reset current thread */
|
/* Reset current thread */
|
||||||
krk_resetStack();
|
krk_resetStack();
|
||||||
krk_currentThread.frames = calloc(FRAMES_MAX,sizeof(CallFrame));
|
krk_currentThread.frames = calloc(KRK_CALL_FRAMES_MAX,sizeof(CallFrame));
|
||||||
krk_currentThread.flags = flags & 0x00FF;
|
krk_currentThread.flags = flags & 0x00FF;
|
||||||
krk_currentThread.module = NULL;
|
krk_currentThread.module = NULL;
|
||||||
krk_currentThread.watchdog = 0;
|
krk_currentThread.watchdog = 0;
|
||||||
|
619
src/vm.h
619
src/vm.h
@ -7,16 +7,39 @@
|
|||||||
#include "table.h"
|
#include "table.h"
|
||||||
#include "object.h"
|
#include "object.h"
|
||||||
|
|
||||||
#define FRAMES_MAX 64
|
#define KRK_CALL_FRAMES_MAX 64
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Represents a managed call state in a VM thread.
|
||||||
|
*
|
||||||
|
* For every managed function call, including the top-level module,
|
||||||
|
* a call frame is added to the stack to track the running function,
|
||||||
|
* the current opcode instruction, the offset into the stack, and
|
||||||
|
* the valid globals table.
|
||||||
|
*
|
||||||
|
* Call frames are used directly by the VM as the source of
|
||||||
|
* opcodes and operands during execution, and are used by the exception
|
||||||
|
* handler to roll back execution to the appropriate environment.
|
||||||
|
*/
|
||||||
typedef struct {
|
typedef struct {
|
||||||
KrkClosure * closure;
|
KrkClosure * closure; /**< Pointer to the function object containing the code object for this frame */
|
||||||
uint8_t * ip;
|
uint8_t * ip; /**< Instruction pointer within the code object's bytecode data */
|
||||||
size_t slots;
|
size_t slots; /**< Offset into the stack at which this function call's arguments begin */
|
||||||
size_t outSlots;
|
size_t outSlots; /**< Offset into the stack at which stackTop will be reset upon return */
|
||||||
KrkTable * globals;
|
KrkTable * globals; /**< Pointer to the attribute table containing valud global vairables for this call */
|
||||||
} CallFrame;
|
} CallFrame;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Index numbers for always-available interned strings representing important method and member names.
|
||||||
|
*
|
||||||
|
* The VM must look up many methods and members by fixed names. To avoid
|
||||||
|
* continuously having to box and unbox these from C strings to the appropriate
|
||||||
|
* interned KrkString, we keep an array of the KrkString pointers in the global VM state.
|
||||||
|
*
|
||||||
|
* These values are the offsets into that index for each of the relevant
|
||||||
|
* function names (generally with extra underscores removed). For example
|
||||||
|
* METHOD_INIT is the offset for the string value for "__init__".
|
||||||
|
*/
|
||||||
typedef enum {
|
typedef enum {
|
||||||
METHOD_INIT,
|
METHOD_INIT,
|
||||||
METHOD_STR,
|
METHOD_STR,
|
||||||
@ -51,103 +74,131 @@ typedef enum {
|
|||||||
METHOD__MAX,
|
METHOD__MAX,
|
||||||
} KrkSpecialMethods;
|
} KrkSpecialMethods;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Table of basic exception types.
|
||||||
|
*
|
||||||
|
* These are the core exception types, available in managed code
|
||||||
|
* from the builtin namespace. A single instance of this struct
|
||||||
|
* is attached to the global VM state so that C code can quickly
|
||||||
|
* access these exception types for use with krk_runtimeException.
|
||||||
|
*
|
||||||
|
* @see krk_runtimeException
|
||||||
|
*/
|
||||||
struct Exceptions {
|
struct Exceptions {
|
||||||
KrkClass * baseException;
|
KrkClass * baseException; /**< @exception Exception The base exception type. */
|
||||||
KrkClass * typeError;
|
KrkClass * typeError; /**< @exception TypeError An argument or value was not of the expected type. */
|
||||||
KrkClass * argumentError;
|
KrkClass * argumentError; /**< @exception ArgumentException The number of arguments passed to a function was not as expected. */
|
||||||
KrkClass * indexError;
|
KrkClass * indexError; /**< @exception IndexError An attempt was made to reference an invalid array index. */
|
||||||
KrkClass * keyError;
|
KrkClass * keyError; /**< @exception KeyError An attempt was made to reference an invalid mapping key. */
|
||||||
KrkClass * attributeError;
|
KrkClass * attributeError; /**< @exception AttributeError An attempt was made to reference an invalid object property. */
|
||||||
KrkClass * nameError;
|
KrkClass * nameError; /**< @exception NameError An attempt was made to reference an undeclared global variable. */
|
||||||
KrkClass * importError;
|
KrkClass * importError; /**< @exception ImportError An error was encountered when attempting to import a module. */
|
||||||
KrkClass * ioError;
|
KrkClass * ioError; /**< @exception IOError An error was encountered in operating system's IO library. */
|
||||||
KrkClass * valueError;
|
KrkClass * valueError; /**< @exception ValueError The value of a parameter or variable is not valid. */
|
||||||
KrkClass * keyboardInterrupt;
|
KrkClass * keyboardInterrupt; /**< @exception KeyboardInterrupt An interrupt signal was received. */
|
||||||
KrkClass * zeroDivisionError;
|
KrkClass * zeroDivisionError; /**< @exception ZeroDivisionError A mathematical function attempted to divide by zero. */
|
||||||
KrkClass * notImplementedError;
|
KrkClass * notImplementedError; /**< @exception NotImplementedError The method is not implemented, either for the given arguments or in general. */
|
||||||
KrkClass * syntaxError;
|
KrkClass * syntaxError; /**< @exception SyntaxError The compiler encountered an unrecognized or invalid source code input. */
|
||||||
};
|
};
|
||||||
|
|
||||||
/**
|
/**
|
||||||
* Be sure not to reorder this, even if it looks better, to maintain
|
* @brief Table of classes for built-in object types.
|
||||||
* ABI compatibility with existing binaries.
|
*
|
||||||
|
* For use by C modules and within the VM, an instance of this struct
|
||||||
|
* is attached to the global VM state. At VM initialization, each
|
||||||
|
* built-in class is attached to this table, and the class values
|
||||||
|
* stored here are used for integrated type checking with krk_isInstanceOf.
|
||||||
|
*
|
||||||
|
* @note As this and other tables are used directly by embedders, do not
|
||||||
|
* reorder the layout of the individual class pointers, even if
|
||||||
|
* it looks nicer. The ordering here is part of our library ABI.
|
||||||
*/
|
*/
|
||||||
struct BaseClasses {
|
struct BaseClasses {
|
||||||
KrkClass * objectClass; /* Root of everything */
|
KrkClass * objectClass; /**< The base of all classes within the type tree. */
|
||||||
KrkClass * moduleClass; /* Simple class mostly to provide __repr__ for modules */
|
KrkClass * moduleClass; /**< A class for representing imported modules, both managed and C. */
|
||||||
|
KrkClass * typeClass; /**< Classes themselves are of this class. */
|
||||||
KrkClass * typeClass; /* Class */
|
KrkClass * intClass; /**< Primitive integer type. */
|
||||||
KrkClass * intClass; /* Integer */
|
KrkClass * floatClass; /**< Primitive double-precision floating-point type. */
|
||||||
KrkClass * floatClass; /* Floating */
|
KrkClass * boolClass; /**< Primitive boolean type. */
|
||||||
KrkClass * boolClass; /* Boolean */
|
KrkClass * noneTypeClass; /**< The class of the None value. */
|
||||||
KrkClass * noneTypeClass; /* None */
|
KrkClass * strClass; /**< Built-in Unicode string type. */
|
||||||
KrkClass * strClass; /* String */
|
KrkClass * functionClass; /**< Represents a code object (KrkFunction) or function object (KrkClosure) */
|
||||||
KrkClass * functionClass; /* Functions, Closures */
|
KrkClass * methodClass; /**< Represents a bound method (KrkBoundMethod) */
|
||||||
KrkClass * methodClass; /* BoundMethod */
|
KrkClass * tupleClass; /**< An immutable collection of arbitrary values. */
|
||||||
KrkClass * tupleClass; /* Tuple */
|
KrkClass * bytesClass; /**< An immutable sequence of bytes. */
|
||||||
KrkClass * bytesClass; /* Bytes */
|
KrkClass * listiteratorClass; /**< Iterator over lists */
|
||||||
|
KrkClass * rangeClass; /**< An object representing a start and end point for a sequence of integers. */
|
||||||
KrkClass * listiteratorClass;
|
KrkClass * rangeiteratorClass; /**< Iterator over a range of values */
|
||||||
KrkClass * rangeClass;
|
KrkClass * striteratorClass; /**< Iterator over characters (by codepoint) in a string */
|
||||||
KrkClass * rangeiteratorClass;
|
KrkClass * tupleiteratorClass; /**< Iterator over values in a tuple */
|
||||||
KrkClass * striteratorClass;
|
KrkClass * listClass; /**< Mutable collection of arbitrary values. */
|
||||||
KrkClass * tupleiteratorClass;
|
KrkClass * dictClass; /**< Mutable mapping of hashable keys to arbitrary values. */
|
||||||
|
KrkClass * dictitemsClass; /**< Iterator over the (key,value) pairs of a dict */
|
||||||
KrkClass * listClass;
|
KrkClass * dictkeysClass; /**< Iterator over the keys of a dict */
|
||||||
KrkClass * dictClass;
|
KrkClass * bytesiteratorClass; /**< Iterator over the integer byte values of a bytes object. */
|
||||||
KrkClass * dictitemsClass;
|
|
||||||
KrkClass * dictkeysClass;
|
|
||||||
|
|
||||||
KrkClass * bytesiteratorClass;
|
|
||||||
};
|
};
|
||||||
|
|
||||||
/**
|
/**
|
||||||
* Thread state represents everything that changes during execution
|
* @brief Execution state of a VM thread.
|
||||||
* and isn't a global property of the shared garbage collector.
|
*
|
||||||
|
* Each thread in the VM has its own local thread state, which contains
|
||||||
|
* the thread's stack, stack pointer, call frame stack, a thread-specific
|
||||||
|
* VM flags bitarray, and an exception state.
|
||||||
|
*
|
||||||
|
* @see krk_currentThread
|
||||||
*/
|
*/
|
||||||
typedef struct ThreadState {
|
typedef struct ThreadState {
|
||||||
struct ThreadState * next;
|
struct ThreadState * next; /**< Invasive list pointer to next thread. */
|
||||||
|
|
||||||
CallFrame * frames;
|
CallFrame * frames; /**< Call frame stack for this thread, max KRK_CALL_FRAMES_MAX */
|
||||||
size_t frameCount;
|
size_t frameCount; /**< Number of active call frames. */
|
||||||
size_t stackSize;
|
size_t stackSize; /**< Size of the allocated stack space for this thread. */
|
||||||
KrkValue * stack;
|
KrkValue * stack; /**< Pointer to the bottom of the stack for this thread. */
|
||||||
KrkValue * stackTop;
|
KrkValue * stackTop; /**< Pointer to the top of the stack. */
|
||||||
KrkUpvalue * openUpvalues;
|
KrkUpvalue * openUpvalues; /**< Flexible array of unclosed upvalues. */
|
||||||
ssize_t exitOnFrame;
|
ssize_t exitOnFrame; /**< When called in a nested context, the frame offset to exit the VM dispatch loop on. */
|
||||||
|
|
||||||
KrkInstance * module;
|
KrkInstance * module; /**< The current module execution context. */
|
||||||
KrkValue currentException;
|
KrkValue currentException; /**< When an exception is thrown, it is stored here. */
|
||||||
int flags;
|
int flags; /**< Thread-local VM flags; each thread inherits the low byte of the global VM flags. */
|
||||||
long watchdog;
|
long watchdog; /**< Decrementing watchdog timer for embedding. */
|
||||||
|
|
||||||
#define THREAD_SCRATCH_SIZE 3
|
#define THREAD_SCRATCH_SIZE 3
|
||||||
KrkValue scratchSpace[THREAD_SCRATCH_SIZE];
|
KrkValue scratchSpace[THREAD_SCRATCH_SIZE]; /**< A place to store a few values to keep them from being prematurely GC'd. */
|
||||||
} KrkThreadState;
|
} KrkThreadState;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Global VM state.
|
||||||
|
*
|
||||||
|
* This state is shared by all VM threads and stores the
|
||||||
|
* path to the VM binary, global execution flags, the
|
||||||
|
* string and module tables, tables of builtin types,
|
||||||
|
* and the state of the (shared) garbage collector.
|
||||||
|
*/
|
||||||
typedef struct {
|
typedef struct {
|
||||||
int globalFlags; /* Global VM state flags */
|
int globalFlags; /**< Global VM state flags */
|
||||||
char * binpath; /* A string representing the name of the interpreter binary. */
|
char * binpath; /**< A string representing the name of the interpreter binary. */
|
||||||
KrkTable strings; /* Strings table */
|
KrkTable strings; /**< Strings table */
|
||||||
KrkTable modules; /* Module cache */
|
KrkTable modules; /**< Module cache */
|
||||||
KrkInstance * builtins; /* '__builtins__' module */
|
KrkInstance * builtins; /**< '__builtins__' module */
|
||||||
KrkInstance * system; /* 'kuroko' module */
|
KrkInstance * system; /**< 'kuroko' module */
|
||||||
KrkValue * specialMethodNames; /* Cached strings of important method and function names */
|
KrkValue * specialMethodNames; /**< Cached strings of important method and function names */
|
||||||
struct BaseClasses * baseClasses; /* Pointer to a (static) namespacing struct for the KrkClass*'s of built-in object types */
|
struct BaseClasses * baseClasses; /**< Pointer to a (static) namespacing struct for the KrkClass*'s of built-in object types */
|
||||||
struct Exceptions * exceptions; /* Pointer to a (static) namespacing struct for the KrkClass*'s of basic exception types */
|
struct Exceptions * exceptions; /**< Pointer to a (static) namespacing struct for the KrkClass*'s of basic exception types */
|
||||||
|
|
||||||
/* Garbage collector state */
|
/* Garbage collector state */
|
||||||
KrkObj * objects; /* Linked list of all objects in the GC */
|
KrkObj * objects; /**< Linked list of all objects in the GC */
|
||||||
size_t bytesAllocated; /* Running total of bytes allocated */
|
size_t bytesAllocated; /**< Running total of bytes allocated */
|
||||||
size_t nextGC; /* Point at which we should sweep again */
|
size_t nextGC; /**< Point at which we should sweep again */
|
||||||
size_t grayCount; /* Count of objects marked by scan. */
|
size_t grayCount; /**< Count of objects marked by scan. */
|
||||||
size_t grayCapacity; /* How many objects we can fit in the scan list. */
|
size_t grayCapacity; /**< How many objects we can fit in the scan list. */
|
||||||
KrkObj** grayStack; /* Scan list */
|
KrkObj** grayStack; /**< Scan list */
|
||||||
|
|
||||||
KrkThreadState * threads; /* All the threads. */
|
KrkThreadState * threads; /**< Invasive linked list of all VM threads. */
|
||||||
} KrkVM;
|
} KrkVM;
|
||||||
|
|
||||||
/* Thread-specific flags */
|
/* Thread-specific flags */
|
||||||
|
/* TODO Should these be in an enum instead? */
|
||||||
#define KRK_ENABLE_TRACING (1 << 0)
|
#define KRK_ENABLE_TRACING (1 << 0)
|
||||||
#define KRK_ENABLE_DISASSEMBLY (1 << 1)
|
#define KRK_ENABLE_DISASSEMBLY (1 << 1)
|
||||||
#define KRK_ENABLE_SCAN_TRACING (1 << 2)
|
#define KRK_ENABLE_SCAN_TRACING (1 << 2)
|
||||||
@ -165,47 +216,447 @@ extern __thread KrkThreadState krk_currentThread;
|
|||||||
extern KrkThreadState krk_currentThread;
|
extern KrkThreadState krk_currentThread;
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Singleton instance of the shared VM state.
|
||||||
|
*/
|
||||||
extern KrkVM krk_vm;
|
extern KrkVM krk_vm;
|
||||||
#define vm krk_vm
|
#define vm krk_vm
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Initialize the VM at program startup.
|
||||||
|
*
|
||||||
|
* All library users must call this exactly once on startup to create
|
||||||
|
* the built-in types, modules, and functions for the VM and prepare
|
||||||
|
* the string and module tables. Optionally, callers may set `vm.binpath`
|
||||||
|
* before calling krk_initVM to allow the VM to locate the interpreter
|
||||||
|
* binary and establish the default module paths.
|
||||||
|
*
|
||||||
|
* @param flags Combination of global VM flags and initial thread flags.
|
||||||
|
*/
|
||||||
extern void krk_initVM(int flags);
|
extern void krk_initVM(int flags);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Release resources from the VM.
|
||||||
|
*
|
||||||
|
* Generally, it is desirable to call this once before the hosting program exits.
|
||||||
|
* If a fresh VM state is needed, krk_freeVM should be called before a further
|
||||||
|
* call to krk_initVM is made. The resources released here can include allocated
|
||||||
|
* heap memory, FILE pointers or descriptors, or various other things which were
|
||||||
|
* initialized by C extension modules.
|
||||||
|
*/
|
||||||
extern void krk_freeVM(void);
|
extern void krk_freeVM(void);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Reset the current thread's stack state to the top level.
|
||||||
|
*
|
||||||
|
* In a repl, this can be called before or after each iteration to clean up any
|
||||||
|
* remnant stack entries from an uncaught exception. It should not be called
|
||||||
|
* during normal execution by C extensions. Values on the stack may be lost
|
||||||
|
* to garbage collection after a call to krk_resetStack .
|
||||||
|
*/
|
||||||
extern void krk_resetStack(void);
|
extern void krk_resetStack(void);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Compile and execute a source code input.
|
||||||
|
*
|
||||||
|
* This is the lowest level call for most usecases, including execution
|
||||||
|
* of commands from a REPL or when executing a file.
|
||||||
|
*
|
||||||
|
* @param src Source code to compile and run.
|
||||||
|
* @param newScope Whether this code should be interpreted in the context of a new module.
|
||||||
|
* @param fromName Name of the function or module being interpreted.
|
||||||
|
* @param fromFile Path to the source file, or a representative string like "<stdin>".
|
||||||
|
* @return When newScope is non-zero, an object representing the globals of the new scope;
|
||||||
|
* otherwise, the returned result of the execution of this code. If an uncaught
|
||||||
|
* exception occurred, this will be None, krk_currentThread.flags should indicate
|
||||||
|
* KRK_HAS_EXCEPTION, and krk_currentThread.currentException should contain the raised
|
||||||
|
* exception value.
|
||||||
|
*/
|
||||||
extern KrkValue krk_interpret(const char * src, int newScope, char *, char *);
|
extern KrkValue krk_interpret(const char * src, int newScope, char *, char *);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Load and run a source file and return when execution completes.
|
||||||
|
*
|
||||||
|
* Loads and runs a source file. Can be used by interpreters to run scripts,
|
||||||
|
* either in the context of a new a module or as if they were continuations
|
||||||
|
* of the current module state (eg. as if they were lines entered on a repl)
|
||||||
|
*
|
||||||
|
* @param fileName Path to the source file to read and execute.
|
||||||
|
* @param newScope Whether this file should be run in the context of a new module.
|
||||||
|
* @param fromName Value to assign to __name__
|
||||||
|
* @param fromFile Value to assign to __file__
|
||||||
|
* @return As with krk_interpret, an object representing the newly created module,
|
||||||
|
* or the final return value of the VM execution.
|
||||||
|
*/
|
||||||
extern KrkValue krk_runfile(const char * fileName, int newScope, char *, char *);
|
extern KrkValue krk_runfile(const char * fileName, int newScope, char *, char *);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Load and run a file as a module.
|
||||||
|
*
|
||||||
|
* Similar to krk_runfile, but ensures that execution of the VM returns to the caller
|
||||||
|
* after the file is run. This should be run after calling krk_startModule to initialize
|
||||||
|
* a new module context and is used internally by the import mechanism.
|
||||||
|
*
|
||||||
|
* @param fileName Path to the source file to read and execute.
|
||||||
|
* @param fromName Value to assign to __name__
|
||||||
|
* @param fromFile Value to assign to __file__
|
||||||
|
* @return The object representing the module, or None if execution of the file failed.
|
||||||
|
*/
|
||||||
extern KrkValue krk_callfile(const char * fileName, char * fromName, char * fromFile);
|
extern KrkValue krk_callfile(const char * fileName, char * fromName, char * fromFile);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Push a stack value.
|
||||||
|
*
|
||||||
|
* Pushes a value onto the current thread's stack, triggering a
|
||||||
|
* stack resize if there is not enough space to hold the new value.
|
||||||
|
*
|
||||||
|
* @param value Value to push.
|
||||||
|
*/
|
||||||
extern void krk_push(KrkValue value);
|
extern void krk_push(KrkValue value);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Pop the top of the stack.
|
||||||
|
*
|
||||||
|
* Removes and returns the value at the top of current thread's stack.
|
||||||
|
* Generally, it is preferably to leave values on the stack and use
|
||||||
|
* krk_peek if the value is desired, as removing a value from the stack
|
||||||
|
* may result in it being garbage collected.
|
||||||
|
*
|
||||||
|
* @return The value previously at the top of the stack.
|
||||||
|
*/
|
||||||
extern KrkValue krk_pop(void);
|
extern KrkValue krk_pop(void);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Peek down from the top of the stack.
|
||||||
|
*
|
||||||
|
* Obtains a value from the current thread's stack without modifying the stack.
|
||||||
|
*
|
||||||
|
* @param distance How far down from the top of the stack to peek (0 = the top)
|
||||||
|
* @return The value from the stack.
|
||||||
|
*/
|
||||||
extern KrkValue krk_peek(int distance);
|
extern KrkValue krk_peek(int distance);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Get the name of the type of a value.
|
||||||
|
*
|
||||||
|
* Obtains the C string representing the name of the class
|
||||||
|
* associated with the given value. Useful for crafting
|
||||||
|
* exception messages, such as those describing TypeErrors.
|
||||||
|
*
|
||||||
|
* @param value Value to examine
|
||||||
|
* @return Nul-terminated C string of the type of 'value'.
|
||||||
|
*/
|
||||||
extern const char * krk_typeName(KrkValue value);
|
extern const char * krk_typeName(KrkValue value);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Attach a native C function to an attribute table.
|
||||||
|
*
|
||||||
|
* Attaches the given native function pointer to an attribute table
|
||||||
|
* while managing the stack shuffling and boxing of both the name and
|
||||||
|
* the function object. If 'name' begins with a '.', the native function
|
||||||
|
* is marked as a method. If 'name' begins with a ':', the native function
|
||||||
|
* is marked as a dynamic property.
|
||||||
|
*
|
||||||
|
* @param table Attribute table to attach to, such as &someInstance->fields
|
||||||
|
* @param name Nil-terminated C string with the name to assign
|
||||||
|
* @param function Native function pointer to attach
|
||||||
|
* @return A pointer to the object representing the attached function.
|
||||||
|
*/
|
||||||
extern KrkNative * krk_defineNative(KrkTable * table, const char * name, NativeFn function);
|
extern KrkNative * krk_defineNative(KrkTable * table, const char * name, NativeFn function);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Attach a native dynamic property to an attribute table.
|
||||||
|
*
|
||||||
|
* Mostly the same as defineNative, but ensures the creation of a dynamic property.
|
||||||
|
* The intention of this function is to replace uses of defineNative with ":" names,
|
||||||
|
* and replace specialized methods with KrkProperty* objects.
|
||||||
|
*
|
||||||
|
* @param table Attribute table to attach to, such as &someInstance->fields
|
||||||
|
* @param name Nil-terminated C string with the name to assign
|
||||||
|
* @param function Native function pointer to attach
|
||||||
|
* @return A pointer to the property object created.
|
||||||
|
*/
|
||||||
extern KrkProperty * krk_defineNativeProperty(KrkTable * table, const char * name, NativeFn func);
|
extern KrkProperty * krk_defineNativeProperty(KrkTable * table, const char * name, NativeFn func);
|
||||||
extern void krk_attachNamedObject(KrkTable * table, const char name[], KrkObj * obj);
|
|
||||||
|
/**
|
||||||
|
* @brief Attach a value to an attribute table.
|
||||||
|
*
|
||||||
|
* Manages the stack shuffling and boxing of the name string when attaching
|
||||||
|
* a value to an attribute table. Rather than using krk_tableSet, this is
|
||||||
|
* the preferred method of supplying fields to objects from C code.
|
||||||
|
*
|
||||||
|
* @param table Attribute table to attach to, such as &someInstance->fields
|
||||||
|
* @param name Nil-terminated C string with the name to assign
|
||||||
|
* @param obj Value to attach.
|
||||||
|
*/
|
||||||
extern void krk_attachNamedValue(KrkTable * table, const char name[], KrkValue obj);
|
extern void krk_attachNamedValue(KrkTable * table, const char name[], KrkValue obj);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Attach an object to an attribute table.
|
||||||
|
*
|
||||||
|
* Manages the stack shuffling and boxing of the name string when attaching
|
||||||
|
* an object to an attribute table. Rather than using krk_tableSet, this is
|
||||||
|
* the preferred method of supplying fields to objects from C code.
|
||||||
|
*
|
||||||
|
* This is a convenience wrapper around krk_attachNamedValue.
|
||||||
|
*
|
||||||
|
* @param table Attribute table to attach to, such as &someInstance->fields
|
||||||
|
* @param name Nil-terminated C string with the name to assign
|
||||||
|
* @param obj Object to attach.
|
||||||
|
*/
|
||||||
|
extern void krk_attachNamedObject(KrkTable * table, const char name[], KrkObj * obj);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Raise an exception.
|
||||||
|
*
|
||||||
|
* Creates an instance of the given exception type, passing a formatted
|
||||||
|
* string to the initializer. All of the core exception types take an option
|
||||||
|
* string value to attach to the exception, but third-party exception types
|
||||||
|
* may have different initializer signatures and need separate initialization.
|
||||||
|
*
|
||||||
|
* The created exception object is attached to the current thread state and
|
||||||
|
* the HAS_EXCEPTION flag is set.
|
||||||
|
*
|
||||||
|
* @param type Class pointer for the exception type, eg. vm.exceptions->valueError
|
||||||
|
* @param fmt Format string.
|
||||||
|
* @return As a convenience to C extension authors, returns None.
|
||||||
|
*/
|
||||||
extern KrkValue krk_runtimeError(KrkClass * type, const char * fmt, ...);
|
extern KrkValue krk_runtimeError(KrkClass * type, const char * fmt, ...);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Get a pointer to the current thread state.
|
||||||
|
*
|
||||||
|
* Generally equivalent to &krk_currentThread, though krk_currentThread
|
||||||
|
* itself may be implemented as a macro that calls this function depending
|
||||||
|
* on the platform's thread support.
|
||||||
|
*
|
||||||
|
* @return Pointer to current thread's thread state.
|
||||||
|
*/
|
||||||
extern KrkThreadState * krk_getCurrentThread(void);
|
extern KrkThreadState * krk_getCurrentThread(void);
|
||||||
|
|
||||||
extern KrkInstance * krk_dictCreate(void);
|
/**
|
||||||
|
* @brief Continue VM execution until the next exit trigger.
|
||||||
|
*
|
||||||
|
* Resumes the VM dispatch loop, returning to the caller when
|
||||||
|
* the next exit trigger event happens. Generally, callers will
|
||||||
|
* want to set the current thread's exitOnFrame before calling
|
||||||
|
* krk_runNext. Alternatively, see krk_callValue which manages
|
||||||
|
* exit triggers automatically when calling function objects.
|
||||||
|
*
|
||||||
|
* @return Value returned by the exit trigger, generally the value
|
||||||
|
* returned by the inner function before the VM returned
|
||||||
|
* to the exit frame.
|
||||||
|
*/
|
||||||
extern KrkValue krk_runNext(void);
|
extern KrkValue krk_runNext(void);
|
||||||
extern KrkClass * krk_getType(KrkValue);
|
|
||||||
|
/**
|
||||||
|
* @brief Get the class representing a value.
|
||||||
|
*
|
||||||
|
* Returns the class object representing the type of a value.
|
||||||
|
* This may be the direct class of an instance, or a pseudoclass
|
||||||
|
* for other value types.
|
||||||
|
*
|
||||||
|
* @param value Reference value to examine.
|
||||||
|
* @return A pointer to the value's type's class object.
|
||||||
|
*/
|
||||||
|
extern KrkClass * krk_getType(KrkValue value);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Determine if a class is an instance or subclass of a given type.
|
||||||
|
*
|
||||||
|
* Searches the class hierarchy of the given value to determine if it is
|
||||||
|
* a subtype of 'type'. As this chains through the inheritence tree, the
|
||||||
|
* more deeply subclassed 'obj' is, the longer it may take to determine
|
||||||
|
* if it is a subtype of 'type'. All types should eventually be subtypes
|
||||||
|
* of the 'object' type, so this condition should not be checked. For
|
||||||
|
* some types, convenience macros are available. If you need to check if
|
||||||
|
* 'obj' is a specific type, exclusive of subtypes, compare krk_getType
|
||||||
|
* instead of using this function.
|
||||||
|
*
|
||||||
|
* @param obj Value to examine.
|
||||||
|
* @param type Class object to test for membership of.
|
||||||
|
* @return 1 if obj is an instance of type or of a subclass of type
|
||||||
|
*/
|
||||||
extern int krk_isInstanceOf(KrkValue obj, KrkClass * type);
|
extern int krk_isInstanceOf(KrkValue obj, KrkClass * type);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Perform method binding on the stack.
|
||||||
|
*
|
||||||
|
* Performs attribute lookup from the class '_class' for 'name'.
|
||||||
|
* If 'name' is not a valid method, the binding fails.
|
||||||
|
* If 'name' is a valid method, the method will be retrieved and
|
||||||
|
* bound to the instance on the top of the stack, replacing it
|
||||||
|
* with a BoundMethod object.
|
||||||
|
*
|
||||||
|
* @param _class Class object to resolve methods from.
|
||||||
|
* @param name String object with the name of the method to resolve.
|
||||||
|
* @return 1 if the method has been bound, 0 if binding failed.
|
||||||
|
*/
|
||||||
extern int krk_bindMethod(KrkClass * _class, KrkString * name);
|
extern int krk_bindMethod(KrkClass * _class, KrkString * name);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Call a callable value in the current stack context.
|
||||||
|
*
|
||||||
|
* Executes the given callable object (function, bound method, object
|
||||||
|
* with a __call__() method, etc.) using 'argCount' arguments from the stack.
|
||||||
|
*
|
||||||
|
* @param callee Value referencing a callable object.
|
||||||
|
* @param argCount Arguments to retreive from stack.
|
||||||
|
* @param extra Whether extra arguments below argCount should be
|
||||||
|
* considered as part of this call frame. Generally,
|
||||||
|
* when this is 1, the value below the arguments is
|
||||||
|
* the callable object. Most library users will want
|
||||||
|
* to leave this as 0 when calling normal functions,
|
||||||
|
* bound method objects, or ubound methods when the
|
||||||
|
* instance is included in the arguments already.
|
||||||
|
* @return An indicator of how the result should be obtained:
|
||||||
|
* 1: The VM must be resumed to run managed code.
|
||||||
|
* 2: The callable was a native function and result should be popped now.
|
||||||
|
* Else: The call failed. An exception may have already been set.
|
||||||
|
*/
|
||||||
extern int krk_callValue(KrkValue callee, int argCount, int extra);
|
extern int krk_callValue(KrkValue callee, int argCount, int extra);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Create a list object.
|
||||||
|
*
|
||||||
|
* This is the native function bound to 'listOf'.
|
||||||
|
*/
|
||||||
extern KrkValue krk_list_of(int argc, KrkValue argv[], int hasKw);
|
extern KrkValue krk_list_of(int argc, KrkValue argv[], int hasKw);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Create a dict object.
|
||||||
|
*
|
||||||
|
* This is the native function bound to 'dictOf'
|
||||||
|
*/
|
||||||
extern KrkValue krk_dict_of(int argc, KrkValue argv[], int hasKw);
|
extern KrkValue krk_dict_of(int argc, KrkValue argv[], int hasKw);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Create a tuple object.
|
||||||
|
*
|
||||||
|
* This is the native function bound to 'tupleOf'.
|
||||||
|
*/
|
||||||
extern KrkValue krk_tuple_of(int argc, KrkValue argv[], int hasKw);
|
extern KrkValue krk_tuple_of(int argc, KrkValue argv[], int hasKw);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Call a callable and manage VM state to obtain the return value.
|
||||||
|
*
|
||||||
|
* This is a wrapper around various mechanisms including krk_callValue
|
||||||
|
* intended for use by C extensions to call arbitrary functions without
|
||||||
|
* knowledge of their implementation details. See the notes for
|
||||||
|
* krk_callValue's 'extra' paramater for details on how 'isMethod' is used.
|
||||||
|
*
|
||||||
|
* @param value Callable object reference.
|
||||||
|
* @param argCount Arguments to collect from the stack.
|
||||||
|
* @param isMethod This should almost always be 0.
|
||||||
|
* @return The return value of the function.
|
||||||
|
*/
|
||||||
extern KrkValue krk_callSimple(KrkValue value, int argCount, int isMethod);
|
extern KrkValue krk_callSimple(KrkValue value, int argCount, int isMethod);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Convenience function for creating new types.
|
||||||
|
*
|
||||||
|
* Creates a class object, output to *_class, setting its name to 'name', inheriting
|
||||||
|
* from 'base', and attaching it with its name to the fields table of the given 'module'.
|
||||||
|
*
|
||||||
|
* @param module Pointer to an instance for a module to attach to, or NULL to skip attaching.
|
||||||
|
* @param _class Output pointer to assign the new class object to.
|
||||||
|
* @param name Name of the new class.
|
||||||
|
* @param base Pointer to class object to inherit from.
|
||||||
|
* @return A pointer to the class object, equivalent to the value assigned to *_class.
|
||||||
|
*/
|
||||||
extern KrkClass * krk_makeClass(KrkInstance * module, KrkClass ** _class, const char * name, KrkClass * base);
|
extern KrkClass * krk_makeClass(KrkInstance * module, KrkClass ** _class, const char * name, KrkClass * base);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Finalize a class by collecting pointers to core methods.
|
||||||
|
*
|
||||||
|
* Scans through the methods table of a class object to find special
|
||||||
|
* methods and assign them to the class object's pointer table so they
|
||||||
|
* can be referenced directly without performing hash lookups.
|
||||||
|
*
|
||||||
|
* @param _class Class object to finalize.
|
||||||
|
*/
|
||||||
extern void krk_finalizeClass(KrkClass * _class);
|
extern void krk_finalizeClass(KrkClass * _class);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief If there is an active exception, print a traceback to stderr.
|
||||||
|
*
|
||||||
|
* This function is exposed as a convenience for repl developers. Normally,
|
||||||
|
* the VM will call dumpTraceback itself if an exception is unhandled and no
|
||||||
|
* exit trigger is current set. The traceback is obtained from the exception
|
||||||
|
* object. If the exception object does not have a traceback, only the
|
||||||
|
* exception itself will be printed. The traceback printer will attempt to
|
||||||
|
* open source files to print faulting lines and may call into the VM if the
|
||||||
|
* exception object has a managed implementation of __str__.
|
||||||
|
*/
|
||||||
extern void krk_dumpTraceback();
|
extern void krk_dumpTraceback();
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Set up a new module object in the current thread.
|
||||||
|
*
|
||||||
|
* Creates a new instance of the module type and attaches a __builtins__
|
||||||
|
* reference to its fields. The module becomes the current thread's
|
||||||
|
* main module, but is not directly attached to the module table.
|
||||||
|
*
|
||||||
|
* @param name Name of the module, which is assigned to __name__
|
||||||
|
* @return The instance object representing the module.
|
||||||
|
*/
|
||||||
extern KrkInstance * krk_startModule(const char * name);
|
extern KrkInstance * krk_startModule(const char * name);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Obtain a list of properties for an object.
|
||||||
|
*
|
||||||
|
* This is the native function bound to 'object.__dir__'
|
||||||
|
*/
|
||||||
extern KrkValue krk_dirObject(int argc, KrkValue argv[], int hasKw);
|
extern KrkValue krk_dirObject(int argc, KrkValue argv[], int hasKw);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Load a module by name.
|
||||||
|
*
|
||||||
|
* This is generally called by the import mechanisms to load a single module.
|
||||||
|
*
|
||||||
|
* @param name Name of the module, used for file lookup.
|
||||||
|
* @param moduleOut Receives a value with the module object.
|
||||||
|
* @param runAs Name to attach to __name__ for this module, different from 'name'.
|
||||||
|
* @return 1 if the module was loaded, 0 if an ImportError occurred.
|
||||||
|
*/
|
||||||
extern int krk_loadModule(KrkString * name, KrkValue * moduleOut, KrkString * runAs);
|
extern int krk_loadModule(KrkString * name, KrkValue * moduleOut, KrkString * runAs);
|
||||||
|
|
||||||
/* obj_str.h */
|
/**
|
||||||
|
* @brief Load a module from a package.
|
||||||
|
*
|
||||||
|
* Given a package identifier, attempt to the load module
|
||||||
|
* into the module table.
|
||||||
|
*
|
||||||
|
* @param name String object of the dot-separated package path to import.
|
||||||
|
* @return 1 if the module was loaded, 0 if an ImportError occurred.
|
||||||
|
*/
|
||||||
|
extern int krk_doRecursiveModuleLoad(KrkString * name);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Determine the truth of a value.
|
||||||
|
*
|
||||||
|
* Determines if a value represents a "falsey" value.
|
||||||
|
* Empty collections, 0-length strings, False, numeric 0,
|
||||||
|
* None, etc. are "falsey". Other values are generally "truthy".
|
||||||
|
*
|
||||||
|
* @param value Value to examine.
|
||||||
|
* @return 1 if falsey, 0 if truthy
|
||||||
|
*/
|
||||||
|
extern int krk_isFalsey(KrkValue value);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Concatenate two strings.
|
||||||
|
*
|
||||||
|
* This is a convenience function which calls 'str.__add__' on the top stack
|
||||||
|
* values. Generally, this should be avoided - use StringBuilder instead.
|
||||||
|
*/
|
||||||
extern void krk_addObjects(void);
|
extern void krk_addObjects(void);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* All of the remaining stuff is internal and shouldn't be used by library users or embedders.
|
||||||
|
* FIXME This stuff needs to be moved to another header! FIXME
|
||||||
|
*/
|
||||||
|
|
||||||
extern KrkValue _str___get__(int argc, KrkValue argv[], int hasKw);
|
extern KrkValue _str___get__(int argc, KrkValue argv[], int hasKw);
|
||||||
#define krk_string_get _str___get__
|
#define krk_string_get _str___get__
|
||||||
extern KrkValue _str___int__(int argc, KrkValue argv[], int hasKw);
|
extern KrkValue _str___int__(int argc, KrkValue argv[], int hasKw);
|
||||||
@ -220,7 +671,6 @@ extern KrkValue _str_format(int argc, KrkValue argv[], int hasKw);
|
|||||||
/* obj_dict.h */
|
/* obj_dict.h */
|
||||||
extern KrkValue krk_dict_nth_key_fast(size_t capacity, KrkTableEntry * entries, size_t index);
|
extern KrkValue krk_dict_nth_key_fast(size_t capacity, KrkTableEntry * entries, size_t index);
|
||||||
|
|
||||||
extern int krk_isFalsey(KrkValue value);
|
|
||||||
|
|
||||||
extern void _createAndBind_numericClasses(void);
|
extern void _createAndBind_numericClasses(void);
|
||||||
extern void _createAndBind_strClass(void);
|
extern void _createAndBind_strClass(void);
|
||||||
@ -239,7 +689,6 @@ extern void _createAndBind_timeMod(void);
|
|||||||
extern void _createAndBind_osMod(void);
|
extern void _createAndBind_osMod(void);
|
||||||
extern void _createAndBind_fileioMod(void);
|
extern void _createAndBind_fileioMod(void);
|
||||||
|
|
||||||
extern int krk_doRecursiveModuleLoad(KrkString * name);
|
|
||||||
|
|
||||||
extern KrkValue krk_operator_lt(KrkValue,KrkValue);
|
extern KrkValue krk_operator_lt(KrkValue,KrkValue);
|
||||||
extern KrkValue krk_operator_gt(KrkValue,KrkValue);
|
extern KrkValue krk_operator_gt(KrkValue,KrkValue);
|
||||||
|
Loading…
Reference in New Issue
Block a user