/dports/editors/poke/poke-1.0/poke/ |
H A D | pk-cmd-ios.c | 51 io = pk_ios_search_by_id (poke_compiler, io_id); in pk_cmd_ios() 58 pk_ios_set_cur (poke_compiler, io); in pk_cmd_ios() 85 if (pk_ios_search (poke_compiler, filename) != NULL) in pk_cmd_file() 115 io = pk_ios_cur (poke_compiler); in pk_cmd_close() 120 io = pk_ios_search_by_id (poke_compiler, io_id); in pk_cmd_close() 128 changed = (io == pk_ios_cur (poke_compiler)); in pk_cmd_close() 129 pk_ios_close (poke_compiler, io); in pk_cmd_close() 133 if (pk_ios_cur (poke_compiler) == NULL) in pk_cmd_close() 218 pk_ios_map (poke_compiler, print_info_ios, table); in pk_cmd_info_ios() 310 if (pk_ios_search (poke_compiler, mem_name) != NULL) in pk_cmd_mem() [all …]
|
H A D | pk-cmd-set.c | 38 pk_printf ("%d\n", pk_obase (poke_compiler)); in pk_cmd_set_obase() 52 pk_set_obase (poke_compiler, base); in pk_cmd_set_obase() 124 pk_set_endian (poke_compiler, endian); in pk_cmd_set_endian() 167 pk_set_nenc (poke_compiler, nenc); in pk_cmd_set_nenc() 278 if (pk_pretty_print (poke_compiler)) in pk_cmd_set_pretty_print() 328 pk_set_oacutoff (poke_compiler, cutoff); in pk_cmd_set_oacutoff() 356 pk_set_odepth (poke_compiler, odepth); in pk_cmd_set_odepth() 399 if (pk_omaps (poke_compiler)) in pk_cmd_set_omaps() 422 pk_set_omaps (poke_compiler, omaps_p); in pk_cmd_set_omaps() 439 omode = pk_omode (poke_compiler); in pk_cmd_set_omode() [all …]
|
H A D | pk-hserver.c | 69 pk_val port = pk_decl_val (poke_compiler, "hserver_port"); in pk_hserver_port() 78 pk_val cls = pk_decl_val (poke_compiler, "hserver_get_token"); in pk_hserver_get_token() 83 ret = pk_call (poke_compiler, cls, &token, PK_NULL); in pk_hserver_get_token() 92 pk_val cls = pk_decl_val (poke_compiler, "hserver_token_p"); in pk_hserver_token_p() 107 pk_val cls = pk_decl_val (poke_compiler, "hserver_token_kind"); in pk_hserver_token_kind() 122 pk_val cls = pk_decl_val (poke_compiler, "hserver_token_cmd"); in pk_hserver_cmd() 128 ret = pk_call (poke_compiler, cls, &cmd, token_val, PK_NULL); in pk_hserver_cmd() 323 if (!pk_load (poke_compiler, "pk-hserver")) in pk_hserver_init() 334 pk_decl_set_val (poke_compiler, "hserver_hostname", in pk_hserver_init() 363 pk_decl_set_val (poke_compiler, "hserver_port", in pk_hserver_start() [all …]
|
H A D | pk-cmd-map.c | 51 pk_ios cur_ios = pk_ios_cur (poke_compiler); in pk_cmd_map_create() 64 if (pk_ios_search_by_id (poke_compiler, ios_id) == NULL) in pk_cmd_map_create() 101 ios_id = pk_ios_get_id (pk_ios_cur (poke_compiler)); in pk_cmd_map_remove() 105 if (pk_ios_search_by_id (poke_compiler, ios_id) == NULL) in pk_cmd_map_remove() 137 ios_id = pk_ios_get_id (pk_ios_cur (poke_compiler)); in pk_cmd_map_show() 210 ios_id = pk_ios_get_id (pk_ios_cur (poke_compiler)); in pk_cmd_map_entry_add() 230 if (!pk_decl_p (poke_compiler, varname, PK_DECL_KIND_VAR)) in pk_cmd_map_entry_add() 238 val = pk_decl_val (poke_compiler, varname); in pk_cmd_map_entry_add() 279 ios_id = pk_ios_get_id (pk_ios_cur (poke_compiler)); in pk_cmd_map_entry_remove() 322 ios_id = pk_ios_get_id (pk_ios_cur (poke_compiler)); in pk_cmd_map_load() [all …]
|
H A D | pk-cmd-vm.c | 40 ret = pk_disassemble_expression (poke_compiler, expr, in pk_cmd_vm_disas_exp() 67 ret = pk_compile_expression (poke_compiler, expr, NULL, &cls); in pk_cmd_vm_disas_fun() 74 ret = pk_disassemble_function_val (poke_compiler, cls, in pk_cmd_vm_disas_fun() 91 pk_print_profile (poke_compiler); in pk_cmd_vm_profile_show() 98 pk_reset_profile (poke_compiler); in pk_cmd_vm_profile_reset()
|
H A D | poke.c | 134 pk_compiler poke_compiler; variable 297 pk_compiler_free (poke_compiler); in finalize() 342 pk_defvar (poke_compiler, "argv", argv_array); in set_script_args() 417 pk_set_quiet_p (poke_compiler, 1); in parse_args_2() 421 if (pk_compile_file (poke_compiler, optarg, in parse_args_2() 448 if (pk_compile_file (poke_compiler, optarg, &exit_status) != PK_OK) in parse_args_2() 549 poke_compiler = pk_compiler_new (&poke_term_if); in initialize() 550 if (poke_compiler == NULL) in initialize() 554 if (pk_defvar (poke_compiler, "poke_interactive_p", in initialize() 559 if (!pk_load (poke_compiler, "poke")) in initialize()
|
H A D | pk-cmd.c | 517 && pk_ios_cur (poke_compiler) == NULL) in pk_cmd_exec_1() 525 pk_ios cur_io = pk_ios_cur (poke_compiler); in pk_cmd_exec_1() 616 pk_set_lexical_cuckolding_p (poke_compiler, 1); in pk_cmd_exec() 620 if (pk_compile_buffer (poke_compiler, ecmd, &end) != PK_OK) in pk_cmd_exec() 631 if (pk_compile_statement (poke_compiler, ecmd, &end, &val) != PK_OK) in pk_cmd_exec() 639 pk_print_val (poke_compiler, val); in pk_cmd_exec() 643 pk_set_lexical_cuckolding_p (poke_compiler, 0); in pk_cmd_exec() 732 if (!pk_load (poke_compiler, "pk-cmd")) in pk_cmd_init()
|
H A D | pk-cmd-help.c | 37 pk_help = pk_decl_val (poke_compiler, "pk_help"); in pk_cmd_help() 39 if (pk_call (poke_compiler, pk_help, &ret, topic, PK_NULL) == PK_ERROR) in pk_cmd_help()
|
H A D | pk-cmd-def.c | 116 pk_decl_map (poke_compiler, PK_DECL_KIND_VAR, print_var_decl, in pk_cmd_info_var() 134 pk_decl_map (poke_compiler, PK_DECL_KIND_FUNC, print_fun_decl, in pk_cmd_info_fun() 151 pk_decl_map (poke_compiler, PK_DECL_KIND_TYPE, print_type_decl, in pk_cmd_info_types()
|
H A D | pk-map.c | 153 cur_ios = pk_ios_cur (poke_compiler); in pk_map_alien_token_handler() 209 pk_set_alien_token_fn (poke_compiler, pk_map_alien_token_handler); in pk_map_init() 473 if (pk_compile_buffer (poke_compiler, in pk_map_load_parsed_map() 493 if (pk_compile_expression (poke_compiler, in pk_map_load_parsed_map() 529 if (pk_compile_buffer (poke_compiler, in pk_map_load_parsed_map() 551 offset = pk_decl_val (poke_compiler, varname); in pk_map_load_parsed_map() 665 val = pk_decl_val (poke_compiler, "map_load_path"); in pk_map_resolve_map()
|
H A D | pk-ios.c | 32 ios_id = pk_ios_open (poke_compiler, handler, 0, 1); in pk_open_ios() 42 auto_map = pk_decl_val (poke_compiler, "auto_map"); in pk_open_ios()
|
H A D | poke.h | 38 extern pk_compiler poke_compiler;
|
H A D | pk-repl.c | 62 char *function_name = pk_completion_function (poke_compiler, in poke_completion_function() 286 cur_ios = pk_ios_cur (poke_compiler); in pk_prompt()
|
H A D | pk-table.c | 240 pk_print_val (poke_compiler, val); in pk_table_print()
|