--- JSON-XS/XS.xs	2007/03/24 22:55:16	1.13
+++ JSON-XS/XS.xs	2007/03/25 02:32:40	1.15
@@ -22,7 +22,7 @@
 #define INDENT_STEP 3  // spaces per indentation level
 
 #define UTF8_MAX_LEN      11 // for perls UTF-X: max. number of octets per character
-#define SHORT_STRING_LEN 256 // special-case strings of up to this size
+#define SHORT_STRING_LEN 512 // special-case strings of up to this size
 
 #define SB do {
 #define SE } while (0)
@@ -1039,10 +1039,14 @@
 PROTOTYPES: ENABLE
 
 void to_json (SV *scalar)
+	ALIAS:
+        objToJson = 0
 	PPCODE:
         XPUSHs (encode_json (scalar, F_UTF8));
 
 void from_json (SV *jsonstr)
+	ALIAS:
+        jsonToObj = 0
 	PPCODE:
         XPUSHs (decode_json (jsonstr, F_UTF8));