Rosetta Code

Symmetric difference: Difference between revisions

← Older editNewer edit →
Content deleted Content added
Thundergnat (talk | contribs)
10,352 edits
Line 63:
text s;
 
r_copy(r, .copy(u);
 
iffor (r_first(x, s) in x) {
doif (r.key(s)) {
if r.delete(r_key(r, s)) {;
} else r_delete(r, s);{
}r.p_integer(s, else {0);
r_p_integer(r, s, 0);}
}
} while (rsk_greater(x, s, s));
}
 
if r.vcall(r_first(ro_, s0, "\n")) {;
do {
o_text(s);
o_byte('\n');
} while (rsk_greater(r, s, s));
}
}
 
Line 86 ⟶ 79:
new_set(...)
{
integer i;
record r;
 
iucall(r_p_integer, =1, r, 0);
while (i < count()) {
r_p_integer(r, $i, 0);
i += 1;
}
 
return r;
}
 
Line 104 ⟶ 92:
new_set("Jim", "Mary", "John", "Bob"));
 
return 0;
}</lang>
{{out}}
Retrieved from "https://rosettacode.org/wiki/Symmetric_difference"