vim-55/src/misc1.c

527     int		lead_len;		/* length of comment leader */
528     char_u	*lead_flags;	/* position in 'comments' for comment leader */
529     char_u	*leader = NULL;		/* copy of comment leader */
568 	 * with the indenting and comment leader to its heart's content.  Then
634      * set because automatically inserting a comment leader also sets did_ai.
834      * Find out if the current line starts with a comment leader.
844 	char_u	*lead_repl = NULL;	    /* replaces comment leader */
855 	 * If the comment leader has the start, middle or end flag, it may not
856 	 * be used or may be replaced with the middle leader.
871 		     * Doing "O" on a start of comment does not insert leader.
885 		 * Isolate the strings of the middle and end leader.
909 		 * the comment leader.
923 		 * Doing "o" on a start of comment inserts the middle leader.
935 		     * comment leader, then put a space after the middle
936 		     * comment leader on the next line.
951 		 * Doing "o" on the end of a comment does not insert leader.
963 		 * Doing "O" on the end of a comment inserts the middle leader.
964 		 * Find the string for the middle leader, searching backwards.
995 		 * Comment leader for first line only:	Don't repeat leader
996 		 * when using "O", blank out leader when using "o".
1011 	    leader = alloc(lead_len + lead_repl_len + extra_space +
1013 	    allocated = leader;		    /* remember to free it later */
1015 	    if (leader == NULL)
1019 		vim_strncpy(leader, saved_line, lead_len);
1022 		 * Replace leader with lead_repl, right or left adjusted
1038 		    if (c == COM_RIGHT)    /* right adjusted leader */
1040 			/* find last non-white in the leader to line up with */
1041 			for (p = leader + lead_len - 1; p > leader
1056 			    while (old_size < repl_size && p > leader)
1058 				mb_ptr_back(leader, p);
1064 					(size_t)((leader + lead_len) - endp));
1068 			if (p < leader + lead_repl_len)
1069 			    p = leader;
1074 			if (p + lead_repl_len > leader + lead_len)
1077 			/* blank-out any other chars from the old leader. */
1078 			while (--p >= leader)
1081 			    int l = mb_head_off(leader, p);
1092 				   (size_t)((leader + lead_len) - (p + l + 1)));
1102 		    else		    /* left adjusted leader */
1104 			p = skipwhite(leader);
1124 				       (size_t)(lead_len - i - (p - leader)));
1132 			 * leader by spaces.  Keep Tabs, the indent must
1134 			for (p += lead_repl_len; p < leader + lead_len; ++p)
1138 				if (p + 1 < leader + lead_len && p[1] == TAB)
1142 						     (leader + lead_len) - p);
1159 						     (leader + lead_len) - p);
1175 			newindent = get_indent_str(leader, (int)curbuf->b_p_ts);
1189 					       && leader[lead_len - 1] == ' ')
1192 			if (vim_strchr(skipwhite(leader), '\t') != NULL)
1198 		    /* If the leader ends in white space, don't add an
1200 		    if (lead_len > 0 && vim_iswhite(leader[lead_len - 1]))
1202 		    leader[lead_len] = NUL;
1207 		    leader[lead_len++] = ' ';
1208 		    leader[lead_len] = NUL;
1215 		 * is in the comment leader
1223 		    while (lead_len && vim_iswhite(*leader))
1227 			++leader;
1239 	     * We have finished a comment, so we don't use the leader.
1304     /* concatenate leader and p_extra, if there is a leader */
1307 	STRCAT(leader, p_extra);
1308 	p_extra = leader;
1313 	end_comment_pending = NUL;  /* turns out there was no leader */
1402      * In REPLACE mode, for each character in the extra leader, there must be
1473 	    && leader == NULL
1549  * comment leader.