diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/ccl.c | 4 |
1 files changed, 2 insertions, 2 deletions
| @@ -1053,13 +1053,13 @@ CCL-PROGRAM on exit.") | |||
| 1053 | if (ccl.ic < i && i < ccl.size) | 1053 | if (ccl.ic < i && i < ccl.size) |
| 1054 | ccl.ic = i; | 1054 | ccl.ic = i; |
| 1055 | } | 1055 | } |
| 1056 | outbufsize = XSTRING (str)->size * ccl.buf_magnification + 256; | 1056 | outbufsize = XSTRING (str)->size_byte * ccl.buf_magnification + 256; |
| 1057 | outbuf = (char *) xmalloc (outbufsize); | 1057 | outbuf = (char *) xmalloc (outbufsize); |
| 1058 | if (!outbuf) | 1058 | if (!outbuf) |
| 1059 | error ("Not enough memory"); | 1059 | error ("Not enough memory"); |
| 1060 | ccl.last_block = NILP (contin); | 1060 | ccl.last_block = NILP (contin); |
| 1061 | produced = ccl_driver (&ccl, XSTRING (str)->data, outbuf, | 1061 | produced = ccl_driver (&ccl, XSTRING (str)->data, outbuf, |
| 1062 | XSTRING (str)->size, outbufsize, (int *)0); | 1062 | XSTRING (str)->size_byte, outbufsize, (int *)0); |
| 1063 | for (i = 0; i < 8; i++) | 1063 | for (i = 0; i < 8; i++) |
| 1064 | XSET (XVECTOR (status)->contents[i], Lisp_Int, ccl.reg[i]); | 1064 | XSET (XVECTOR (status)->contents[i], Lisp_Int, ccl.reg[i]); |
| 1065 | XSETINT (XVECTOR (status)->contents[8], ccl.ic); | 1065 | XSETINT (XVECTOR (status)->contents[8], ccl.ic); |