… | |
… | |
20 | |
20 | |
21 | #define INIT_SIZE 32 // initial scalar size to be allocated |
21 | #define INIT_SIZE 32 // initial scalar size to be allocated |
22 | #define INDENT_STEP 3 // spaces per indentation level |
22 | #define INDENT_STEP 3 // spaces per indentation level |
23 | |
23 | |
24 | #define UTF8_MAX_LEN 11 // for perls UTF-X: max. number of octets per character |
24 | #define UTF8_MAX_LEN 11 // for perls UTF-X: max. number of octets per character |
25 | #define SHORT_STRING_LEN 256 // special-case strings of up to this size |
25 | #define SHORT_STRING_LEN 512 // special-case strings of up to this size |
26 | |
26 | |
27 | #define SB do { |
27 | #define SB do { |
28 | #define SE } while (0) |
28 | #define SE } while (0) |
29 | |
29 | |
30 | static HV *json_stash; // JSON::XS:: |
30 | static HV *json_stash; // JSON::XS:: |