Commit caa31568 authored by Jim Blandy's avatar Jim Blandy

* textprop.c (Fadd_text_properties): Initialize the modified flag.

	Use a "for (;;)" loop at the end of the function, to indicate that
	all exiting is taken care of inside the loop.
	(Fremove_text_properties): Same.
parent 9e70858b
......@@ -610,7 +610,7 @@ Return t if any property value actually changed, nil otherwise.")
Lisp_Object start, end, properties, object;
{
register INTERVAL i, unchanged;
register int s, len, modified;
register int s, len, modified = 0;
properties = validate_plist (properties);
if (NILP (properties))
......@@ -660,7 +660,7 @@ Return t if any property value actually changed, nil otherwise.")
}
/* We are at the beginning of an interval, with len to scan */
while (len > 0)
for (;;)
{
if (i == 0)
abort ();
......@@ -800,7 +800,7 @@ Return t if any property was actually removed, nil otherwise.")
Lisp_Object start, end, props, object;
{
register INTERVAL i, unchanged;
register int s, len, modified;
register int s, len, modified = 0;
if (NILP (object))
XSET (object, Lisp_Buffer, current_buffer);
......@@ -846,7 +846,7 @@ Return t if any property was actually removed, nil otherwise.")
}
/* We are at the beginning of an interval, with len to scan */
while (len > 0)
for (;;)
{
if (i == 0)
abort ();
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment