C++ (Cpp) perl_scripts_deinitの例

コード例 #1

ファイル: perl-core.c プロジェクト: svn2github/irssi

void perl_core_deinit(void)
{
        perl_scripts_deinit();
	perl_signals_deinit();

	signal_remove("script error", (SIGNAL_FUNC) sig_script_error);
}

コード例 #2

ファイル: perl-fe.c プロジェクト: ahf/irssi

static void cmd_script_reset(const char *data)
{
	void *free_arg;
	GHashTable *optlist;

	if (!cmd_get_params(data, &free_arg, 0 | PARAM_FLAG_OPTIONS,
			    "script reset", &optlist))
		return;

	perl_scripts_deinit();
	perl_scripts_init();

	if (g_hash_table_lookup(optlist, "autorun") != NULL)
		perl_scripts_autorun();

	cmd_params_free(free_arg);
}

コード例 #3

ファイル: perl-fe.c プロジェクト: MaheshWaidande/irssi

static void cmd_script_reset(const char *data)
{
	perl_scripts_deinit();
	perl_scripts_init();
}