comparison src/tooltalk.c @ 444:576fb035e263 r21-2-37

Import from CVS: tag r21-2-37
author cvs
date Mon, 13 Aug 2007 11:36:19 +0200
parents abe6d1db359e
children 183866b06e0b
comparison
equal deleted inserted replaced
443:a8296e22da4e 444:576fb035e263
761 Extcount value_ext_len; 761 Extcount value_ext_len;
762 CHECK_STRING (value); 762 CHECK_STRING (value);
763 TO_EXTERNAL_FORMAT (LISP_STRING, value, 763 TO_EXTERNAL_FORMAT (LISP_STRING, value,
764 ALLOCA, (value_ext, value_ext_len), 764 ALLOCA, (value_ext, value_ext_len),
765 Qnative); 765 Qnative);
766 tt_message_arg_bval_set (m, n, value_ext, value_ext_len); 766 tt_message_arg_bval_set (m, n, (unsigned char *) value_ext, value_ext_len);
767 } 767 }
768 else if (EQ (attribute, Qtt_arg_ival)) 768 else if (EQ (attribute, Qtt_arg_ival))
769 { 769 {
770 CHECK_INT (value); 770 CHECK_INT (value);
771 tt_message_arg_ival_set (m, n, XINT (value)); 771 tt_message_arg_ival_set (m, n, XINT (value));