diff src/ccl.c @ 49600:23a1cea22d13

Trailing whitespace deleted.
author Juanma Barranquero <lekktu@gmail.com>
date Tue, 04 Feb 2003 14:56:31 +0000
parents fc51841e5d97
children 92b845a3d3a6 d7ddb3e565de
line wrap: on
line diff
--- a/src/ccl.c	Tue Feb 04 13:30:45 2003 +0000
+++ b/src/ccl.c	Tue Feb 04 14:56:31 2003 +0000
@@ -426,7 +426,7 @@
 					extended_command (rrr,RRR,Rrr,ARGS)
 				      */
 
-/* 
+/*
    Here after, Extended CCL Instructions.
    Bit length of extended command is 14.
    Therefore, the instruction code range is 0..16384(0x3fff).
@@ -484,7 +484,7 @@
 					3:MAP-ID1
 					4:MAP-ID2
 					...
-				     */ 
+				     */
 
 /* Map the code in reg[rrr] by MAPs starting from the Nth (N =
    reg[RRR]) map.
@@ -562,7 +562,7 @@
    where
 	STARTPOINT is an offset to be used for indexing a map,
 	ENDPOINT is a maximum index number of a map,
-	VAL and VALn is a number, nil, t, or lambda.  
+	VAL and VALn is a number, nil, t, or lambda.
 
    Valid index range of a map of type (a) is:
 	STARTPOINT <= index < STARTPOINT + map_size - 1
@@ -862,7 +862,7 @@
     int ic;			/* Instruction Counter.  */
   };
 
-/* For the moment, we only support depth 256 of stack.  */ 
+/* For the moment, we only support depth 256 of stack.  */
 static struct ccl_prog_stack ccl_prog_stack_struct[256];
 
 int
@@ -1096,7 +1096,7 @@
 		  }
 		CCL_INVALID_CMD;
 	      }
-	    
+
 	    ccl_prog_stack_struct[stack_idx].ccl_prog = ccl_prog;
 	    ccl_prog_stack_struct[stack_idx].ic = ic;
 	    stack_idx++;
@@ -1260,7 +1260,7 @@
 		  src++;
 		  goto ccl_read_multibyte_character_suspend;
 		}
-	      
+
 	      if (!ccl->multibyte)
 		{
 		  int bytes;
@@ -1274,7 +1274,7 @@
 	      i = *src++;
 	      if (i == '\n' && ccl->eol_type != CODING_EOL_LF)
 		{
-		  /* We are encoding.  */ 
+		  /* We are encoding.  */
 		  if (ccl->eol_type == CODING_EOL_CRLF)
 		    {
 		      if (ccl->cr_consumed)
@@ -1399,7 +1399,7 @@
 	      SPLIT_CHAR (op, reg[RRR], i, j);
 	      if (j != -1)
 		i = (i << 7) | j;
-	      
+
 	      reg[rrr] = i;
 	      break;
 
@@ -1411,14 +1411,14 @@
 	      SPLIT_CHAR (op, reg[RRR], i, j);
 	      if (j != -1)
 		i = (i << 7) | j;
-	      
+
 	      reg[rrr] = i;
 	      break;
 
 	    case CCL_LookupIntConstTbl:
 	      op = XINT (ccl_prog[ic]); /* table */
 	      ic++;
-	      {		
+	      {
 		struct Lisp_Hash_Table *h = GET_HASH_TABLE (op);
 
 		op = hash_lookup (h, make_number (reg[RRR]), NULL);
@@ -1443,7 +1443,7 @@
 	      op = XINT (ccl_prog[ic]); /* table */
 	      ic++;
 	      CCL_MAKE_CHAR (reg[RRR], reg[rrr], i);
-	      {		
+	      {
 		struct Lisp_Hash_Table *h = GET_HASH_TABLE (op);
 
 		op = hash_lookup (h, make_number (i), NULL);
@@ -1517,7 +1517,7 @@
 			else
 			  continue;
 		      }
-		    else 
+		    else
 		      continue;
 
 		    if (NILP (content))
@@ -1553,7 +1553,7 @@
 		ic = fin_ic;
 	      }
 	      break;
-	      
+
 	    case CCL_MapMultiple:
 	      {
 		Lisp_Object map, content, attrib, value;
@@ -1640,7 +1640,7 @@
 		      }
 		  }
 		map_vector_size = ASIZE (Vcode_conversion_map_vector);
-		
+
 		do {
 		  for (;map_set_rest_length > 0;i++, ic++, map_set_rest_length--)
 		    {
@@ -1690,7 +1690,7 @@
 			  else
 			    continue;
 			}
-		      else 
+		      else
 			continue;
 
 		      if (NILP (content))
@@ -1808,7 +1808,7 @@
 		  }
 	      }
 	      break;
-	      
+
 	    default:
 	      CCL_INVALID_CMD;
 	    }
@@ -1881,7 +1881,7 @@
 	  bcopy (msg, dst, msglen);
 	  dst += msglen;
 	}
-      
+
       if (ccl->status == CCL_STAT_INVALID_CMD)
 	{
 #if 0 /* If the remaining bytes contain 0x80..0x9F, copying them
@@ -2317,7 +2317,7 @@
 
   CHECK_SYMBOL (symbol);
   CHECK_VECTOR (map);
-  
+
   for (i = 0; i < len; i++)
     {
       Lisp_Object slot = AREF (Vcode_conversion_map_vector, i);