The R Project SVN R

Rev

Rev 24577 | Rev 28991 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 24577 Rev 27421
Line 1071... Line 1071...
1071 
			cur_line[i] = cur_line[i + 1];
 1071 
			cur_line[i] = cur_line[i + 1];
1072 
		    max_pos -= 1;
 1072 
		    max_pos -= 1;
1073 
		}
 1073 
		}
1074 
		break;
 1074 
		break;
1075 
	    case CHARTRANS:
 1075 
	    case CHARTRANS:
1076 
		if(cur_pos < 2) break;
 1076 
		if(cur_pos < 1) break;
- 
 
 1077 
		if(cur_pos >= max_pos) break;
1077 
		cur_char = cur_line[cur_pos];
 1078 
 		cur_char = cur_line[cur_pos];
1078 
		cur_line[cur_pos] = cur_line[cur_pos-1];
 1079 
		cur_line[cur_pos] = cur_line[cur_pos-1];
1079 
		cur_line[cur_pos-1] = cur_char;
 1080 
		cur_line[cur_pos-1] = cur_char;
1080 
		break;
 1081 
		break;
1081 
	    default:
 1082 
	    default:
1082 
		if (chtype || (cur_char=='\n') || (cur_char==EOFKEY)) {
 1083 
		if (chtype || (cur_char=='\n') || (cur_char==EOFKEY)) {