6 |
and semantics are as close as possible to those of the Perl 5 language. |
and semantics are as close as possible to those of the Perl 5 language. |
7 |
|
|
8 |
Written by Philip Hazel |
Written by Philip Hazel |
9 |
Copyright (c) 1997-2007 University of Cambridge |
Copyright (c) 1997-2009 University of Cambridge |
10 |
|
|
11 |
----------------------------------------------------------------------------- |
----------------------------------------------------------------------------- |
12 |
Redistribution and use in source and binary forms, with or without |
Redistribution and use in source and binary forms, with or without |
44 |
|
|
45 |
|
|
46 |
#ifdef HAVE_CONFIG_H |
#ifdef HAVE_CONFIG_H |
47 |
#include <config.h> |
#include "config.h" |
48 |
#endif |
#endif |
49 |
|
|
50 |
#include "pcre_internal.h" |
#include "pcre_internal.h" |
99 |
*/ |
*/ |
100 |
|
|
101 |
real_pcre * |
real_pcre * |
102 |
_pcre_try_flipped(const real_pcre *re, real_pcre *internal_re, |
PRIV(try_flipped)(const real_pcre *re, real_pcre *internal_re, |
103 |
const pcre_study_data *study, pcre_study_data *internal_study) |
const pcre_study_data *study, pcre_study_data *internal_study) |
104 |
{ |
{ |
105 |
if (byteflip(re->magic_number, sizeof(re->magic_number)) != MAGIC_NUMBER) |
if (byteflip(re->magic_number, sizeof(re->magic_number)) != MAGIC_NUMBER) |
128 |
{ |
{ |
129 |
*internal_study = *study; /* To copy other fields */ |
*internal_study = *study; /* To copy other fields */ |
130 |
internal_study->size = byteflip(study->size, sizeof(study->size)); |
internal_study->size = byteflip(study->size, sizeof(study->size)); |
131 |
internal_study->options = byteflip(study->options, sizeof(study->options)); |
internal_study->flags = byteflip(study->flags, sizeof(study->flags)); |
132 |
|
internal_study->minlength = byteflip(study->minlength, |
133 |
|
sizeof(study->minlength)); |
134 |
} |
} |
135 |
|
|
136 |
return internal_re; |
return internal_re; |