diff options
Diffstat (limited to 'plug-ins/script-fu/scheme-wrapper.h')
-rw-r--r-- | plug-ins/script-fu/scheme-wrapper.h | 47 |
1 files changed, 47 insertions, 0 deletions
diff --git a/plug-ins/script-fu/scheme-wrapper.h b/plug-ins/script-fu/scheme-wrapper.h new file mode 100644 index 0000000..9ab44ef --- /dev/null +++ b/plug-ins/script-fu/scheme-wrapper.h @@ -0,0 +1,47 @@ +/* GIMP - The GNU Image Manipulation Program + * Copyright (C) 1995 Spencer Kimball and Peter Mattis + * + * 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 <https://www.gnu.org/licenses/>. + */ + +#ifndef __SCHEME_WRAPPER_H__ +#define __SCHEME_WRAPPER_H__ + +#include "tinyscheme/scheme.h" + +void tinyscheme_init (GList *path, + gboolean register_scripts); + +void ts_set_run_mode (GimpRunMode run_mode); + +void ts_set_print_flag (gint print_flag); +void ts_print_welcome (void); + +const gchar * ts_get_success_msg (void); + +void ts_interpret_stdin (void); + +/* if the return value is 0, success. error otherwise. */ +gint ts_interpret_string (const gchar *expr); + +void ts_stdout_output_func (TsOutputType type, + const char *string, + int len, + gpointer user_data); +void ts_gstring_output_func (TsOutputType type, + const char *string, + int len, + gpointer user_data); + +#endif /* __SCHEME_WRAPPER_H__ */ |