s S reliableLongQuote(S s) {
 i i=0;
 w (contains(s, mk2(i)) ++i;
 ret mk(i)+s+mk2(i);
}

s S mk(i i) { ret "["+repeat('=', i)+"["; }
s S mk2(i i) { ret "]"+repeat('=', i)+"]"; }