env.h

Go to the documentation of this file.

 
/*
    Copyright 2018, 2025 Joel Svensson        svenssonjoel@yahoo.se
 
    This program is free software: you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation, either version 3 of the License, or
    (at your option) any later version.
 
    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.
 
    You should have received a copy of the GNU General Public License
    along with this program.  If not, see <http://www.gnu.org/licenses/>.
*/
 
#ifndef ENV_H_
#define ENV_H_
 
#include "lbm_types.h"
 
#ifdef __cplusplus
extern "C" {
#endif
 
#define GLOBAL_ENV_ROOTS 32
#define GLOBAL_ENV_MASK  0x1F
 
//environment interface
int lbm_init_env(void);
lbm_value *lbm_get_global_env(void);
lbm_uint lbm_get_global_env_size(void);
lbm_value lbm_env_copy_spine(lbm_value env);
bool lbm_env_lookup_b(lbm_value *res, lbm_value sym, lbm_value env);
bool lbm_global_env_lookup(lbm_value *res, lbm_value sym);
lbm_value lbm_env_set(lbm_value env, lbm_value key, lbm_value val);
lbm_value lbm_env_set_functional(lbm_value env, lbm_value key, lbm_value val);
lbm_value lbm_env_modify_binding(lbm_value env, lbm_value key, lbm_value val);
lbm_value lbm_env_drop_binding(lbm_value env, lbm_value key);
 
#ifdef __cplusplus
}
#endif
#endif