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 #ifndef MPSL_H_
  26 #define MPSL_H_
  27
  28 #ifdef __cplusplus
  29 extern "C" {
  30 #endif
  31
  32 extern int mpsl_abort;
  33
  34 int mpsl_is_true(mpdm_t v);
  35 mpdm_t mpsl_boolean(int b);
  36
  37 mpdm_t mpsl_set_symbol(mpdm_t s, mpdm_t v, mpdm_t l);
  38 mpdm_t mpsl_get_symbol(mpdm_t s, mpdm_t l);
  39
  40 mpdm_t mpsl_error(mpdm_t err);
  41
  42 mpdm_t mpsl_exec_p(mpdm_t c, mpdm_t args, mpdm_t ctxt);
  43 mpdm_t mpsl_mkins(wchar_t * opcode, int args, mpdm_t a1, mpdm_t a2, mpdm_t a3, mpdm_t a4);
  44
  45 mpdm_t mpsl_compile(mpdm_t code);
  46 mpdm_t mpsl_compile_file(mpdm_t filename, mpdm_t inc);
  47 mpdm_t mpsl_eval(mpdm_t code, mpdm_t args, mpdm_t ctxt);
  48
  49 mpdm_t mpsl_trap(mpdm_t trap_func);
  50
  51 void mpsl_argv(int argc, char * argv[]);
  52
  53 int mpsl_startup(void);
  54 void mpsl_shutdown(void);
  55
  56 wchar_t *mpsl_dump_1(const mpdm_t v, int l, wchar_t *ptr, int *size);
  57
  58 #ifdef __cplusplus
  59 }
  60 #endif
  61
  62 #endif /* MPSL_H_ */