pike.git/
src/
pike_types.cmod
Branch:
Tag:
Non-build tags
All tags
No tags
2020-01-08
2020-01-08 11:18:20 by Henrik Grubbström (Grubba) <grubba@grubba.org>
218dba19cf06c6105de9364b6fbf4285abfcf21a (
9
lines) (+
8
/-
1
)
[
Show
|
Annotate
]
Branch:
master
Compiler: Added int_pos_type_string.
48:
PMOD_EXPORT struct pike_type *string0_type_string; PMOD_EXPORT struct pike_type *string_type_string; PMOD_EXPORT struct pike_type *int_type_string;
+
PMOD_EXPORT struct pike_type *int_pos_type_string;
PMOD_EXPORT struct pike_type *float_type_string; PMOD_EXPORT struct pike_type *function_type_string; PMOD_EXPORT struct pike_type *object_type_string;
8870:
Pike_compiler->type_stackp = type_stack; Pike_compiler->pike_type_mark_stackp = pike_type_mark_stack;
-
int_type_string = CONSTTYPE(tInt); /* MUST come before string! */
+
int_type_string = CONSTTYPE(tInt); /* MUST come before string
and array
! */
+
int_pos_type_string = CONSTTYPE(tIntPos);
string0_type_string = CONSTTYPE(tStr0); string_type_string = CONSTTYPE(tStr32); object_type_string = CONSTTYPE(tObj);
8953:
string_type_string = NULL; free_type(int_type_string); int_type_string = NULL;
+
free_type(int_pos_type_string);
+
int_pos_type_string = NULL;
free_type(float_type_string); float_type_string = NULL; free_type(function_type_string);
9224:
gc_mark_external(string_type_string, " as string_type_string"); if (int_type_string) gc_mark_external(int_type_string, " as int_type_string");
+
if (int_pos_type_string)
+
gc_mark_external(int_pos_type_string, " as int_pos_type_string");
if (object_type_string) gc_mark_external(object_type_string, " as object_type_string"); if (program_type_string)