build the Filter extension on windows
[p5sagit/p5-mst-13.2.git] / embed.h
diff --git a/embed.h b/embed.h
index c50ff16..80d6537 100644 (file)
--- a/embed.h
+++ b/embed.h
 #define do_vecget              Perl_do_vecget
 #define do_vecset              Perl_do_vecset
 #define do_vop                 Perl_do_vop
+#if defined(SOCKS_64BIT_BUG)
+#define s64_get_buffer         S_s64_get_buffer
+#define s64_create_buffer      S_s64_create_buffer
+#define s64_malloc             S_s64_malloc
+#endif
 #define dofile                 Perl_dofile
 #define dowantarray            Perl_dowantarray
 #define dump_all               Perl_dump_all
 #define utilize                        Perl_utilize
 #define utf16_to_utf8          Perl_utf16_to_utf8
 #define utf16_to_utf8_reversed Perl_utf16_to_utf8_reversed
+#define utf8_length            Perl_utf8_length
 #define utf8_distance          Perl_utf8_distance
 #define utf8_hop               Perl_utf8_hop
 #define utf8_to_bytes          Perl_utf8_to_bytes
 #define isa_lookup             S_isa_lookup
 #endif
 #if defined(PERL_IN_UTIL_C) || defined(PERL_DECL_PROT)
+#define stdize_locale          S_stdize_locale
 #define mess_alloc             S_mess_alloc
 #  if defined(LEAKTEST)
 #define xstat                  S_xstat
 #define do_vecget(a,b,c)       Perl_do_vecget(aTHX_ a,b,c)
 #define do_vecset(a)           Perl_do_vecset(aTHX_ a)
 #define do_vop(a,b,c,d)                Perl_do_vop(aTHX_ a,b,c,d)
+#if defined(SOCKS_64BIT_BUG)
+#define s64_get_buffer(a)      S_s64_get_buffer(aTHX_ a)
+#define s64_create_buffer(a)   S_s64_create_buffer(aTHX_ a)
+#define s64_malloc(a)          S_s64_malloc(aTHX_ a)
+#endif
 #define dofile(a)              Perl_dofile(aTHX_ a)
 #define dowantarray()          Perl_dowantarray(aTHX)
 #define dump_all()             Perl_dump_all(aTHX)
 #define utilize(a,b,c,d,e)     Perl_utilize(aTHX_ a,b,c,d,e)
 #define utf16_to_utf8(a,b,c,d) Perl_utf16_to_utf8(aTHX_ a,b,c,d)
 #define utf16_to_utf8_reversed(a,b,c,d)        Perl_utf16_to_utf8_reversed(aTHX_ a,b,c,d)
+#define utf8_length(a,b)       Perl_utf8_length(aTHX_ a,b)
 #define utf8_distance(a,b)     Perl_utf8_distance(aTHX_ a,b)
 #define utf8_hop(a,b)          Perl_utf8_hop(aTHX_ a,b)
 #define utf8_to_bytes(a,b)     Perl_utf8_to_bytes(aTHX_ a,b)
 #  endif
 #endif
 #if defined(PERL_IN_REGCOMP_C) || defined(PERL_DECL_PROT)
-#define reg(a,b)               S_reg(aTHX_ a,b)
-#define reganode(a,b)          S_reganode(aTHX_ a,b)
-#define regatom(a)             S_regatom(aTHX_ a)
-#define regbranch(a,b)         S_regbranch(aTHX_ a,b)
-#define reguni(a,b,c)          S_reguni(aTHX_ a,b,c)
-#define regclass()             S_regclass(aTHX)
-#define regclassutf8()         S_regclassutf8(aTHX)
+#define reg(a,b,c)             S_reg(aTHX_ a,b,c)
+#define reganode(a,b,c)                S_reganode(aTHX_ a,b,c)
+#define regatom(a,b)           S_regatom(aTHX_ a,b)
+#define regbranch(a,b,c)       S_regbranch(aTHX_ a,b,c)
+#define reguni(a,b,c,d)                S_reguni(aTHX_ a,b,c,d)
+#define regclass(a)            S_regclass(aTHX_ a)
+#define regclassutf8(a)                S_regclassutf8(aTHX_ a)
 #define regcurly(a)            S_regcurly(aTHX_ a)
-#define reg_node(a)            S_reg_node(aTHX_ a)
-#define regpiece(a)            S_regpiece(aTHX_ a)
-#define reginsert(a,b)         S_reginsert(aTHX_ a,b)
-#define regoptail(a,b)         S_regoptail(aTHX_ a,b)
-#define regtail(a,b)           S_regtail(aTHX_ a,b)
+#define reg_node(a,b)          S_reg_node(aTHX_ a,b)
+#define regpiece(a,b)          S_regpiece(aTHX_ a,b)
+#define reginsert(a,b,c)       S_reginsert(aTHX_ a,b,c)
+#define regoptail(a,b,c)       S_regoptail(aTHX_ a,b,c)
+#define regtail(a,b,c)         S_regtail(aTHX_ a,b,c)
 #define regwhite(a,b)          S_regwhite(aTHX_ a,b)
-#define nextchar()             S_nextchar(aTHX)
+#define nextchar(a)            S_nextchar(aTHX_ a)
 #define dumpuntil(a,b,c,d,e)   S_dumpuntil(aTHX_ a,b,c,d,e)
 #define put_byte(a,b)          S_put_byte(aTHX_ a,b)
-#define scan_commit(a)         S_scan_commit(aTHX_ a)
-#define cl_anything(a)         S_cl_anything(aTHX_ a)
+#define scan_commit(a,b)       S_scan_commit(aTHX_ a,b)
+#define cl_anything(a,b)       S_cl_anything(aTHX_ a,b)
 #define cl_is_anything(a)      S_cl_is_anything(aTHX_ a)
-#define cl_init(a)             S_cl_init(aTHX_ a)
-#define cl_init_zero(a)                S_cl_init_zero(aTHX_ a)
+#define cl_init(a,b)           S_cl_init(aTHX_ a,b)
+#define cl_init_zero(a,b)      S_cl_init_zero(aTHX_ a,b)
 #define cl_and(a,b)            S_cl_and(aTHX_ a,b)
-#define cl_or(a,b)             S_cl_or(aTHX_ a,b)
-#define study_chunk(a,b,c,d,e) S_study_chunk(aTHX_ a,b,c,d,e)
-#define add_data(a,b)          S_add_data(aTHX_ a,b)
-#define regpposixcc(a)         S_regpposixcc(aTHX_ a)
-#define checkposixcc()         S_checkposixcc(aTHX)
+#define cl_or(a,b,c)           S_cl_or(aTHX_ a,b,c)
+#define study_chunk(a,b,c,d,e,f)       S_study_chunk(aTHX_ a,b,c,d,e,f)
+#define add_data(a,b,c)                S_add_data(aTHX_ a,b,c)
+#define regpposixcc(a,b)       S_regpposixcc(aTHX_ a,b)
+#define checkposixcc(a)                S_checkposixcc(aTHX_ a)
 #endif
 #if defined(PERL_IN_REGEXEC_C) || defined(PERL_DECL_PROT)
 #define regmatch(a)            S_regmatch(aTHX_ a)
 #define isa_lookup(a,b,c,d)    S_isa_lookup(aTHX_ a,b,c,d)
 #endif
 #if defined(PERL_IN_UTIL_C) || defined(PERL_DECL_PROT)
+#define stdize_locale(a)       S_stdize_locale(aTHX_ a)
 #define mess_alloc()           S_mess_alloc(aTHX)
 #  if defined(LEAKTEST)
 #define xstat(a)               S_xstat(aTHX_ a)
 #define do_vecset              Perl_do_vecset
 #define Perl_do_vop            CPerlObj::Perl_do_vop
 #define do_vop                 Perl_do_vop
+#if defined(SOCKS_64BIT_BUG)
+#define do_s64_tell            Perl_do_s64_tell
+#define do_s64_fread           Perl_do_s64_fread
+#define do_s64_getc            Perl_do_s64_getc
+#define do_s64_seek            Perl_do_s64_seek
+#define do_s64_ungetc          Perl_do_s64_ungetc
+#define do_s64_delete_buffer   Perl_do_s64_delete_buffer
+#define do_s64_init_buffer     Perl_do_s64_init_buffer
+#define S_s64_get_buffer       CPerlObj::S_s64_get_buffer
+#define s64_get_buffer         S_s64_get_buffer
+#define S_s64_create_buffer    CPerlObj::S_s64_create_buffer
+#define s64_create_buffer      S_s64_create_buffer
+#define S_s64_malloc           CPerlObj::S_s64_malloc
+#define s64_malloc             S_s64_malloc
+#endif
 #define Perl_dofile            CPerlObj::Perl_dofile
 #define dofile                 Perl_dofile
 #define Perl_dowantarray       CPerlObj::Perl_dowantarray
 #define utf16_to_utf8          Perl_utf16_to_utf8
 #define Perl_utf16_to_utf8_reversed    CPerlObj::Perl_utf16_to_utf8_reversed
 #define utf16_to_utf8_reversed Perl_utf16_to_utf8_reversed
+#define Perl_utf8_length       CPerlObj::Perl_utf8_length
+#define utf8_length            Perl_utf8_length
 #define Perl_utf8_distance     CPerlObj::Perl_utf8_distance
 #define utf8_distance          Perl_utf8_distance
 #define Perl_utf8_hop          CPerlObj::Perl_utf8_hop
 #define isa_lookup             S_isa_lookup
 #endif
 #if defined(PERL_IN_UTIL_C) || defined(PERL_DECL_PROT)
+#define S_stdize_locale                CPerlObj::S_stdize_locale
+#define stdize_locale          S_stdize_locale
 #define S_mess_alloc           CPerlObj::S_mess_alloc
 #define mess_alloc             S_mess_alloc
 #  if defined(LEAKTEST)