mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2024-11-15 21:24:48 +00:00
Code Issues 1 Releases Wiki Activity
561fc15ae9
janet/src/core/state.h

101 lines
3.8 KiB
C
Raw Normal View History

Gitignore was ignore files.
2018-01-20 16:04:30 +00:00
/*
Update Copyright 2020.
2020-01-12 16:50:37 +00:00
* Copyright (c) 2020 Calvin Rose
Gitignore was ignore files.
2018-01-20 16:04:30 +00:00
*
* Permission is hereby granted, free of charge, to any person obtaining a copy
* of this software and associated documentation files (the "Software"), to
* deal in the Software without restriction, including without limitation the
* rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
* sell copies of the Software, and to permit persons to whom the Software is
* furnished to do so, subject to the following conditions:
*
* The above copyright notice and this permission notice shall be included in
* all copies or substantial portions of the Software.
*
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
* AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
* FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
* IN THE SOFTWARE.
*/
Rename to janet
2018-09-06 02:18:42 +00:00
#ifndef JANET_STATE_H_defined
#define JANET_STATE_H_defined
Gitignore was ignore files.
2018-01-20 16:04:30 +00:00
#include <stdint.h>
/* The VM state. Rather than a struct that is passed
Strip trailing whitespace from many files. Add native modules to import with module.native-path.
2018-05-20 01:16:00 +00:00
* around, the vm state is global for simplicity. If
Update copyright date, fix types, remove trailing whitespace.
2019-01-06 08:23:03 +00:00
* at some point a global state object, or context,
* is required to be passed around, this is what would
* be in it. However, thread local global variables for interpreter
* state should allow easy multi-threading. */
Gitignore was ignore files.
2018-01-20 16:04:30 +00:00
Make amalgamtion the default when building. This way we can support fewer build configurations. Also, remove all undefined behavior due to use of memcpy with NULL pointers. GCC was exploiting this to remove NULL checks in some builds.
2020-01-29 05:38:52 +00:00
typedef struct JanetScratch JanetScratch;
Use make-image-dict and load-image-dict in thread/new Rather than messing with janet_core_dictionary, we instead cache the core enevironment, and pull out the needed tables from there. This is more flexible, more correct, and also exposes janet_resolve_core, which can be easily used from the C API.
2019-12-02 10:15:22 +00:00
/* Cache the core environment */
extern JANET_THREAD_LOCAL JanetTable *janet_vm_core_env;
Work on threads. Add send and receive.
2019-12-02 02:28:12 +00:00
Update thoughts.md, and add dst_call and dst_call suspend. dst_call_suspend migt be redundant (suspension of GC is easy enough).
2018-03-04 23:56:13 +00:00
/* How many VM stacks have been entered */
Rename to janet
2018-09-06 02:18:42 +00:00
extern JANET_THREAD_LOCAL int janet_vm_stackn;
Update thoughts.md, and add dst_call and dst_call suspend. dst_call_suspend migt be redundant (suspension of GC is easy enough).
2018-03-04 23:56:13 +00:00
Update state.h
2018-05-14 13:55:34 +00:00
/* The current running fiber on the current thread.
Rename to janet
2018-09-06 02:18:42 +00:00
* Set and unset by janet_run. */
extern JANET_THREAD_LOCAL JanetFiber *janet_vm_fiber;
Working TCP echo server and client. Required a few changes to APIs, namely janet_root_fiber() to get topmost fiber that is active in the current scheduler. This is distinct from janet_current_fiber(), which gets the bottom most fiber in the fiber stack - it might have a parent, and so cannot be reliably resumed. This is the kind of situation that makes symmetric coroutines more attractive.
2020-02-10 01:04:34 +00:00
extern JANET_THREAD_LOCAL JanetFiber *janet_vm_root_fiber;
Update state.h
2018-05-14 13:55:34 +00:00
Experimental changes to janet_call to make it faster. Remove setjmp and fiber creationg from janet_call. This adds the constraint to janet_call can only be called when there is already a current fiber.
2019-02-01 16:56:25 +00:00
/* The current pointer to the inner most jmp_buf. The current
* return point for panics. */
extern JANET_THREAD_LOCAL jmp_buf *janet_vm_jmp_buf;
extern JANET_THREAD_LOCAL Janet *janet_vm_return_reg;
Update copyright date, fix types, remove trailing whitespace.
2019-01-06 08:23:03 +00:00
/* The global registry for c functions. Used to store meta-data
Add first version of marsh (marshaling).
2018-06-12 18:24:45 +00:00
* along with otherwise bare c function pointers. */
Rename to janet
2018-09-06 02:18:42 +00:00
extern JANET_THREAD_LOCAL JanetTable *janet_vm_registry;
Use separate registry table for abstract types. This avoids overloading the registry table, which is intended for names of c functions.
2020-03-14 15:25:39 +00:00
/* Registry for abstract abstract types that can be marshalled.
* We need this to look up the constructors when unmarshalling. */
extern JANET_THREAD_LOCAL JanetTable *janet_vm_abstract_registry;
Add first version of marsh (marshaling).
2018-06-12 18:24:45 +00:00
Gitignore was ignore files.
2018-01-20 16:04:30 +00:00
/* Immutable value cache */
Rename to janet
2018-09-06 02:18:42 +00:00
extern JANET_THREAD_LOCAL const uint8_t **janet_vm_cache;
extern JANET_THREAD_LOCAL uint32_t janet_vm_cache_capacity;
extern JANET_THREAD_LOCAL uint32_t janet_vm_cache_count;
extern JANET_THREAD_LOCAL uint32_t janet_vm_cache_deleted;
Gitignore was ignore files.
2018-01-20 16:04:30 +00:00
Shrink the public interface by hiding internal state.
2018-03-31 20:40:36 +00:00
/* Garbage collection */
Rename to janet
2018-09-06 02:18:42 +00:00
extern JANET_THREAD_LOCAL void *janet_vm_blocks;
Try to remove potential overflow bugs. Also make integer to size_t casts explicit rather than relying on int32_t * sizeof(x) = size_t. This is kind of a personal preference for this problem.
2020-01-03 04:02:57 +00:00
extern JANET_THREAD_LOCAL size_t janet_vm_gc_interval;
extern JANET_THREAD_LOCAL size_t janet_vm_next_collection;
Rename to janet
2018-09-06 02:18:42 +00:00
extern JANET_THREAD_LOCAL int janet_vm_gc_suspend;
Shrink the public interface by hiding internal state.
2018-03-31 20:40:36 +00:00
Merge code back from correctgc.
2018-09-23 21:53:55 +00:00
/* GC roots */
extern JANET_THREAD_LOCAL Janet *janet_vm_roots;
Try to remove potential overflow bugs. Also make integer to size_t casts explicit rather than relying on int32_t * sizeof(x) = size_t. This is kind of a personal preference for this problem.
2020-01-03 04:02:57 +00:00
extern JANET_THREAD_LOCAL size_t janet_vm_root_count;
extern JANET_THREAD_LOCAL size_t janet_vm_root_capacity;
Gitignore was ignore files.
2018-01-20 16:04:30 +00:00
Add scratch memory API. This should make it easier to write code that does not leak memory on panics.
2019-06-02 03:31:39 +00:00
/* Scratch memory */
Make amalgamtion the default when building. This way we can support fewer build configurations. Also, remove all undefined behavior due to use of memcpy with NULL pointers. GCC was exploiting this to remove NULL checks in some builds.
2020-01-29 05:38:52 +00:00
extern JANET_THREAD_LOCAL JanetScratch **janet_scratch_mem;
Add scratch memory API. This should make it easier to write code that does not leak memory on panics.
2019-06-02 03:31:39 +00:00
extern JANET_THREAD_LOCAL size_t janet_scratch_cap;
extern JANET_THREAD_LOCAL size_t janet_scratch_len;
Make janet_equals and janet_compare non recursive This makes these operatios use constant stack space rather than linear stackspace given the size of the inputs. This is important to prevent certain parser input from causing a stack overflow - in general, we try to avoid unbounded recursion.
2020-04-24 21:18:31 +00:00
/* Recursionless traversal of data structures */
typedef struct {
JanetGCObject *self;
JanetGCObject *other;
int32_t index;
int32_t index2;
} JanetTraversalNode;
extern JANET_THREAD_LOCAL JanetTraversalNode *janet_vm_traversal;
extern JANET_THREAD_LOCAL JanetTraversalNode *janet_vm_traversal_top;
extern JANET_THREAD_LOCAL JanetTraversalNode *janet_vm_traversal_base;
Keep single global pthread_cond_t per thread. This will allow thread/select to be implemented. Also add thread/close and close method to threads.
2019-12-05 03:44:53 +00:00
/* Setup / teardown */
#ifdef JANET_THREADS
void janet_threads_init(void);
void janet_threads_deinit(void);
#endif
Rename to janet
2018-09-06 02:18:42 +00:00
#endif /* JANET_STATE_H_defined */
Reference in New Issue Copy Permalink