Hex Artifact Content

Artifact 038b5af4c295231566c491642150cc3e4814c968:


0000: 49 6e 64 65 78 3a 20 74 63 6c 72 65 61 64 6c 69  Index: tclreadli
0010: 6e 65 2f 74 63 6c 72 65 61 64 6c 69 6e 65 2e 63  ne/tclreadline.c
0020: 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  .===============
0030: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0040: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0050: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0060: 3d 3d 3d 3d 3d 3d 0a 2d 2d 2d 20 74 63 6c 72 65  ======.--- tclre
0070: 61 64 6c 69 6e 65 2e 6f 72 69 67 2f 74 63 6c 72  adline.orig/tclr
0080: 65 61 64 6c 69 6e 65 2e 63 0a 2b 2b 2b 20 74 63  eadline.c.+++ tc
0090: 6c 72 65 61 64 6c 69 6e 65 2f 74 63 6c 72 65 61  lreadline/tclrea
00a0: 64 6c 69 6e 65 2e 63 0a 40 40 20 2d 34 39 2c 38  dline.c.@@ -49,8
00b0: 20 2b 34 39 2c 38 20 40 40 0a 20 73 74 61 74 69   +49,8 @@. stati
00c0: 63 20 63 6f 6e 73 74 20 63 68 61 72 2a 20 74 63  c const char* tc
00d0: 6c 72 6c 5f 76 65 72 73 69 6f 6e 5f 73 74 72 20  lrl_version_str 
00e0: 3d 20 54 43 4c 52 4c 5f 56 45 52 53 49 4f 4e 5f  = TCLRL_VERSION_
00f0: 53 54 52 3b 0a 20 73 74 61 74 69 63 20 63 6f 6e  STR;. static con
0100: 73 74 20 63 68 61 72 2a 20 74 63 6c 72 6c 5f 70  st char* tclrl_p
0110: 61 74 63 68 6c 65 76 65 6c 5f 73 74 72 20 3d 20  atchlevel_str = 
0120: 54 43 4c 52 4c 5f 50 41 54 43 48 4c 45 56 45 4c  TCLRL_PATCHLEVEL
0130: 5f 53 54 52 3b 0a 20 0a 2d 23 64 65 66 69 6e 65  _STR;. .-#define
0140: 20 4d 41 4c 4c 4f 43 28 73 69 7a 65 29 20 54 63   MALLOC(size) Tc
0150: 6c 5f 41 6c 6c 6f 63 28 28 69 6e 74 29 20 73 69  l_Alloc((int) si
0160: 7a 65 29 0a 2d 23 64 65 66 69 6e 65 20 46 52 45  ze).-#define FRE
0170: 45 28 70 74 72 29 20 69 66 20 28 70 74 72 29 20  E(ptr) if (ptr) 
0180: 7b 20 54 63 6c 5f 46 72 65 65 28 28 63 68 61 72  { Tcl_Free((char
0190: 2a 29 20 70 74 72 29 3b 20 70 74 72 20 3d 20 30  *) ptr); ptr = 0
01a0: 3b 20 7d 0a 2b 23 64 65 66 69 6e 65 20 4d 41 4c  ; }.+#define MAL
01b0: 4c 4f 43 28 73 69 7a 65 29 20 6d 61 6c 6c 6f 63  LOC(size) malloc
01c0: 28 28 69 6e 74 29 20 73 69 7a 65 29 0a 2b 23 64  ((int) size).+#d
01d0: 65 66 69 6e 65 20 46 52 45 45 28 70 74 72 29 20  efine FREE(ptr) 
01e0: 69 66 20 28 70 74 72 29 20 7b 20 66 72 65 65 28  if (ptr) { free(
01f0: 28 63 68 61 72 2a 29 20 70 74 72 29 3b 20 70 74  (char*) ptr); pt
0200: 72 20 3d 20 30 3b 20 7d 0a 20 0a 20 65 6e 75 6d  r = 0; }. . enum
0210: 20 7b 0a 20 20 20 20 20 5f 43 4d 44 5f 53 45 54   {.     _CMD_SET
0220: 20 20 20 20 20 3d 20 28 31 20 3c 3c 20 30 29 2c       = (1 << 0),
0230: 0a                                               .