mpsl.h

   1 /*
   2
   3     Copyright (C) 2003/2010 Angel Ortega <angel@triptico.com>
   4
   5     mpsl.h - Minimum Profit Scripting Language
   6
   7     This program is free software; you can redistribute it and/or
   8     modify it under the terms of the GNU General Public License
   9     as published by the Free Software Foundation; either version 2
  10     of the License, or (at your option) any later version.
  11
  12     This program is distributed in the hope that it will be useful,
  13     but WITHOUT ANY WARRANTY; without even the implied warranty of
  14     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15     GNU General Public License for more details.
  16
  17     You should have received a copy of the GNU General Public License
  18     along with this program; if not, write to the Free Software
  19     Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  20
  21     http://www.triptico.com
  22
  23 */
  24
  25 #ifdef __cplusplus
  26 extern "C" {
  27 #endif
  28
  29 extern int mpsl_abort;
  30
  31 int mpsl_is_true(mpdm_t v);
  32 mpdm_t mpsl_boolean(int b);
  33
  34 mpdm_t mpsl_set_symbol(mpdm_t s, mpdm_t v, mpdm_t l);
  35 mpdm_t mpsl_get_symbol(mpdm_t s, mpdm_t l);
  36
  37 mpdm_t mpsl_error(mpdm_t err);
  38
  39 mpdm_t mpsl_exec_p(mpdm_t c, mpdm_t args, mpdm_t ctxt);
  40 mpdm_t mpsl_mkins(wchar_t * opcode, int args, mpdm_t a1, mpdm_t a2, mpdm_t a3);
  41
  42 mpdm_t mpsl_compile(mpdm_t code);
  43 mpdm_t mpsl_compile_file(mpdm_t filename, mpdm_t inc);
  44 mpdm_t mpsl_eval(mpdm_t code, mpdm_t args, mpdm_t ctxt);
  45
  46 mpdm_t mpsl_trap(mpdm_t trap_func);
  47
  48 void mpsl_argv(int argc, char * argv[]);
  49
  50 int mpsl_startup(void);
  51 void mpsl_shutdown(void);
  52
  53 wchar_t *mpsl_dump_1(const mpdm_t v, int l, wchar_t *ptr, int *size);
  54
  55 #ifdef __cplusplus
  56 }
  57 #endif