| slang.h | slang.h | |||
|---|---|---|---|---|
| skipping to change at line 25 | skipping to change at line 25 | |||
| but WITHOUT ANY WARRANTY; without even the implied warranty of | but WITHOUT ANY WARRANTY; without even the implied warranty of | |||
| MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |||
| General Public License for more details. | General Public License for more details. | |||
| You should have received a copy of the GNU General Public License | You should have received a copy of the GNU General Public License | |||
| along with this library; if not, write to the Free Software | along with this library; if not, write to the Free Software | |||
| Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, | Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, | |||
| USA. | USA. | |||
| */ | */ | |||
| #define SLANG_VERSION 20200 | #define SLANG_VERSION 20201 | |||
| #define SLANG_VERSION_STRING "2.2.0" | #define SLANG_VERSION_STRING "2.2.1" | |||
| /* #ifdef __DATE__ */ | /* #ifdef __DATE__ */ | |||
| /* # define SLANG_VERSION_STRING SLANG_VERSION_STRING0 " " __DATE__ */ | /* # define SLANG_VERSION_STRING SLANG_VERSION_STRING0 " " __DATE__ */ | |||
| /* #else */ | /* #else */ | |||
| /* # define SLANG_VERSION_STRING SLANG_VERSION_STRING0 */ | /* # define SLANG_VERSION_STRING SLANG_VERSION_STRING0 */ | |||
| /* #endif */ | /* #endif */ | |||
| /*{{{ System Dependent Macros and Typedefs */ | /*{{{ System Dependent Macros and Typedefs */ | |||
| #if defined(__WATCOMC__) && defined(DOS) | #if defined(__WATCOMC__) && defined(DOS) | |||
| # ifndef __MSDOS__ | # ifndef __MSDOS__ | |||
| # define __MSDOS__ | # define __MSDOS__ | |||
| skipping to change at line 741 | skipping to change at line 741 | |||
| SL_EXTERN int SLclass_set_length_function (SLang_Class_Type *, int(*)(SLtyp e, VOID_STAR, unsigned int *)); | SL_EXTERN int SLclass_set_length_function (SLang_Class_Type *, int(*)(SLtyp e, VOID_STAR, unsigned int *)); | |||
| SL_EXTERN int SLclass_set_is_container (SLang_Class_Type *, int); | SL_EXTERN int SLclass_set_is_container (SLang_Class_Type *, int); | |||
| SL_EXTERN int SLclass_set_foreach_functions ( | SL_EXTERN int SLclass_set_foreach_functions ( | |||
| SLang_Class_Type *, | SLang_Class_Type *, | |||
| SLang_Foreach_Context_Type *(*)(SLtype, unsigned int), /* open method * / | SLang_Foreach_Context_Type *(*)(SLtype, unsigned int), /* open method * / | |||
| int (*)(SLtype, SLang_Foreach_Context_Type *), /* foreach method */ | int (*)(SLtype, SLang_Foreach_Context_Type *), /* foreach method */ | |||
| void (*)(SLtype, SLang_Foreach_Context_Type *));/* close method */ | void (*)(SLtype, SLang_Foreach_Context_Type *));/* close method */ | |||
| /* When an array is created, this callback function is called to initialize | ||||
| the data | ||||
| * at the specified address. | ||||
| */ | ||||
| SL_EXTERN int SLclass_set_aelem_init_function (SLang_Class_Type *cl, int (* | ||||
| f)(SLtype, VOID_STAR)); | ||||
| /* Typecast object on the stack to type p1. p2 and p3 should be set to 1 * / | /* Typecast object on the stack to type p1. p2 and p3 should be set to 1 * / | |||
| SL_EXTERN int SLclass_typecast (SLtype, int, int); | SL_EXTERN int SLclass_typecast (SLtype, int, int); | |||
| #define SLMATH_SIN 1 | #define SLMATH_SIN 1 | |||
| #define SLMATH_COS 2 | #define SLMATH_COS 2 | |||
| #define SLMATH_TAN 3 | #define SLMATH_TAN 3 | |||
| #define SLMATH_ATAN 4 | #define SLMATH_ATAN 4 | |||
| #define SLMATH_ASIN 5 | #define SLMATH_ASIN 5 | |||
| #define SLMATH_ACOS 6 | #define SLMATH_ACOS 6 | |||
| #define SLMATH_EXP 7 | #define SLMATH_EXP 7 | |||
| skipping to change at line 888 | skipping to change at line 893 | |||
| extern int _pSLarray_convert_to_array (VOID_STAR cd, | extern int _pSLarray_convert_to_array (VOID_STAR cd, | |||
| int (*get_type)(VOID_STAR, SLuindex_T ype, SLtype *), | int (*get_type)(VOID_STAR, SLuindex_T ype, SLtype *), | |||
| int (*push)(VOID_STAR, SLuindex_Type) , | int (*push)(VOID_STAR, SLuindex_Type) , | |||
| SLuindex_Type num_objects, SLtype typ e); | SLuindex_Type num_objects, SLtype typ e); | |||
| SL_EXTERN int SLang_pop_array_of_type (SLang_Array_Type **atp, SLtype type) ; | SL_EXTERN int SLang_pop_array_of_type (SLang_Array_Type **atp, SLtype type) ; | |||
| SL_EXTERN int SLang_pop_array (SLang_Array_Type **atp, int convert_scalar); | SL_EXTERN int SLang_pop_array (SLang_Array_Type **atp, int convert_scalar); | |||
| SL_EXTERN int SLang_push_array (SLang_Array_Type *at, int do_free); | SL_EXTERN int SLang_push_array (SLang_Array_Type *at, int do_free); | |||
| SL_EXTERN void SLang_free_array (SLang_Array_Type *at); | SL_EXTERN void SLang_free_array (SLang_Array_Type *at); | |||
| SL_EXTERN SLang_Array_Type *SLang_create_array (SLtype, int, VOID_STAR, SLi ndex_Type *, unsigned int); | SL_EXTERN SLang_Array_Type *SLang_create_array (SLtype, int, VOID_STAR, SLi ndex_Type *, unsigned int); | |||
| SL_EXTERN SLang_Array_Type *SLang_create_array1 (SLtype, int, VOID_STAR, SL index_Type *, unsigned int, int); | ||||
| SL_EXTERN SLang_Array_Type *SLang_duplicate_array (SLang_Array_Type *); | SL_EXTERN SLang_Array_Type *SLang_duplicate_array (SLang_Array_Type *); | |||
| SL_EXTERN int SLang_get_array_element (SLang_Array_Type *, SLindex_Type *, VOID_STAR); | SL_EXTERN int SLang_get_array_element (SLang_Array_Type *, SLindex_Type *, VOID_STAR); | |||
| SL_EXTERN int SLang_set_array_element (SLang_Array_Type *, SLindex_Type *, VOID_STAR); | SL_EXTERN int SLang_set_array_element (SLang_Array_Type *, SLindex_Type *, VOID_STAR); | |||
| typedef int SLarray_Contract_Fun_Type (VOID_STAR xp, unsigned int increment , unsigned int num, VOID_STAR yp); | typedef int SLarray_Contract_Fun_Type (VOID_STAR xp, unsigned int increment , unsigned int num, VOID_STAR yp); | |||
| typedef struct | typedef struct | |||
| { | { | |||
| SLtype from_type; /* if array is this type */ | SLtype from_type; /* if array is this type */ | |||
| SLtype typecast_to_type; /* typecast it to this */ | SLtype typecast_to_type; /* typecast it to this */ | |||
| SLtype result_type; /* to produce this */ | SLtype result_type; /* to produce this */ | |||
| skipping to change at line 2141 | skipping to change at line 2147 | |||
| #define SLANG_ABS 0x25 | #define SLANG_ABS 0x25 | |||
| #define SLANG_SIGN 0x26 | #define SLANG_SIGN 0x26 | |||
| #define SLANG_SQR 0x27 | #define SLANG_SQR 0x27 | |||
| #define SLANG_MUL2 0x28 | #define SLANG_MUL2 0x28 | |||
| #define SLANG_ISPOS 0x29 | #define SLANG_ISPOS 0x29 | |||
| #define SLANG_ISNEG 0x2A | #define SLANG_ISNEG 0x2A | |||
| #define SLANG_ISNONNEG 0x2B | #define SLANG_ISNONNEG 0x2B | |||
| #define SLANG_UNARY_OP_MAX 0x2B | #define SLANG_UNARY_OP_MAX 0x2B | |||
| SL_EXTERN SLFUTURE_CONST char *SLang_Error_Message; | /* SL_EXTERN SLFUTURE_CONST char *SLang_Error_Message; */ | |||
| SL_EXTERN int SLadd_intrinsic_variable (SLFUTURE_CONST char *, VOID_STAR, S Ltype, int); | SL_EXTERN int SLadd_intrinsic_variable (SLFUTURE_CONST char *, VOID_STAR, S Ltype, int); | |||
| SL_EXTERN int SLadd_intrinsic_function (SLFUTURE_CONST char *, FVOID_STAR, SLtype, unsigned int,...); | SL_EXTERN int SLadd_intrinsic_function (SLFUTURE_CONST char *, FVOID_STAR, SLtype, unsigned int,...); | |||
| SL_EXTERN int SLns_add_intrinsic_variable (SLang_NameSpace_Type *, SLFUTURE _CONST char *, VOID_STAR, SLtype, int); | SL_EXTERN int SLns_add_intrinsic_variable (SLang_NameSpace_Type *, SLFUTURE _CONST char *, VOID_STAR, SLtype, int); | |||
| SL_EXTERN int SLns_add_intrinsic_function (SLang_NameSpace_Type *, SLFUTURE _CONST char *, FVOID_STAR, SLtype, unsigned int,...); | SL_EXTERN int SLns_add_intrinsic_function (SLang_NameSpace_Type *, SLFUTURE _CONST char *, FVOID_STAR, SLtype, unsigned int,...); | |||
| /* These functions are used to patch intrinsic tables that make use of | /* These functions are used to patch intrinsic tables that make use of | |||
| * dynamically allocated types whose type id is determined at | * dynamically allocated types whose type id is determined at | |||
| * run-time. The second version is useful for the most common case of a | * run-time. The second version is useful for the most common case of a | |||
| End of changes. 4 change blocks. | ||||
| 3 lines changed or deleted | 11 lines changed or added | |||