#include 


/* insert empty col - called internally */
_cbinsertecol(w = refwindow(w0), r0 = 0, c0 = 0, r1 = 0, c1 = 0, mode = 0)
{
        local nr, nc, cmd, c, v;

        nc = abs(c1 - c0) + 1;

        if (nc > 0 && c0 > 0)
        {
                c = (mode == 0) ? c0 - 1 : c1;
                v = repcol({}, nc);

                cmd = sprintf("insertcol(w%d, v, %lld)", getwnum(w), c);
                                
                eval(cmd);
        }
}