Mercurial > hg > xemacs-beta

comparison src/text.h @ 2286:04bc9d2f42c7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2004-09-20 19:18:55 by james] Mark all unused parameters as unused. Also eliminate some unneeded local variables.
author james
date Mon, 20 Sep 2004 19:20:08 +0000
parents 543769b89fed
children ba4677f54a05
comparison
equal deleted inserted replaced
2285:914c5afaac33 2286:04bc9d2f42c7
273 the raw value and look for that, than repeatedly convert each raw value 273 the raw value and look for that, than repeatedly convert each raw value
274 in the buffer into a character. */ 274 in the buffer into a character. */
275 275
276 DECLARE_INLINE_HEADER ( 276 DECLARE_INLINE_HEADER (
277 Raw_Ichar 277 Raw_Ichar
278 ichar_to_raw (Ichar ch, Internal_Format fmt, Lisp_Object object) 278 ichar_to_raw (Ichar ch, Internal_Format fmt,
279 Lisp_Object UNUSED (object))
279 ) 280 )
280 { 281 {
281 switch (fmt) 282 switch (fmt)
282 { 283 {
283 case FORMAT_DEFAULT: 284 case FORMAT_DEFAULT:
297 /* Return whether CH is representable in the given format in the given 298 /* Return whether CH is representable in the given format in the given
298 object. */ 299 object. */
299 300
300 DECLARE_INLINE_HEADER ( 301 DECLARE_INLINE_HEADER (
301 int 302 int
302 ichar_fits_in_format (Ichar ch, Internal_Format fmt, Lisp_Object object) 303 ichar_fits_in_format (Ichar ch, Internal_Format fmt,
304 Lisp_Object UNUSED (object))
303 ) 305 )
304 { 306 {
305 switch (fmt) 307 switch (fmt)
306 { 308 {
307 case FORMAT_DEFAULT: 309 case FORMAT_DEFAULT:
319 /* Assuming the formats are the same, return whether the two objects 321 /* Assuming the formats are the same, return whether the two objects
320 represent text in exactly the same way. */ 322 represent text in exactly the same way. */
321 323
322 DECLARE_INLINE_HEADER ( 324 DECLARE_INLINE_HEADER (
323 int 325 int
324 objects_have_same_internal_representation (Lisp_Object srcobj, 326 objects_have_same_internal_representation (Lisp_Object UNUSED (srcobj),
325 Lisp_Object dstobj) 327 Lisp_Object UNUSED (dstobj))
326 ) 328 )
327 { 329 {
328 /* &&#### implement this properly when we allow per-object format 330 /* &&#### implement this properly when we allow per-object format
329 differences */ 331 differences */
330 return 1; 332 return 1;
831 that way. */ 833 that way. */
832 834
833 DECLARE_INLINE_HEADER ( 835 DECLARE_INLINE_HEADER (
834 Ichar 836 Ichar
835 itext_ichar_fmt (const Ibyte *ptr, Internal_Format fmt, 837 itext_ichar_fmt (const Ibyte *ptr, Internal_Format fmt,
836 Lisp_Object object) 838 Lisp_Object UNUSED (object))
837 ) 839 )
838 { 840 {
839 switch (fmt) 841 switch (fmt)
840 { 842 {
841 case FORMAT_DEFAULT: 843 case FORMAT_DEFAULT:
861 FORMAT_DEFAULT. */ 863 FORMAT_DEFAULT. */
862 864
863 DECLARE_INLINE_HEADER ( 865 DECLARE_INLINE_HEADER (
864 Ichar 866 Ichar
865 itext_ichar_ascii_fmt (const Ibyte *ptr, Internal_Format fmt, 867 itext_ichar_ascii_fmt (const Ibyte *ptr, Internal_Format fmt,
866 Lisp_Object object) 868 Lisp_Object UNUSED (object))
867 ) 869 )
868 { 870 {
869 switch (fmt) 871 switch (fmt)
870 { 872 {
871 case FORMAT_DEFAULT: 873 case FORMAT_DEFAULT:
927 */ 929 */
928 930
929 DECLARE_INLINE_HEADER ( 931 DECLARE_INLINE_HEADER (
930 Bytecount 932 Bytecount
931 set_itext_ichar_fmt (Ibyte *ptr, Ichar x, Internal_Format fmt, 933 set_itext_ichar_fmt (Ibyte *ptr, Ichar x, Internal_Format fmt,
932 Lisp_Object object) 934 Lisp_Object UNUSED (object))
933 ) 935 )
934 { 936 {
935 switch (fmt) 937 switch (fmt)
936 { 938 {
937 case FORMAT_DEFAULT: 939 case FORMAT_DEFAULT: