Function sprintfTileElementHalf

src/library/blas/gens/tile.c:320–339

}

void
sprintfTileElementHalf(
    Kstring *str,
    const Tile *tile,
    unsigned int row,
    unsigned int col,
    TileElementHalf half)
{
    int len;

    assert(isComplexType(tile->dtype));

    // sprintf the full element and the drop an unneded half
    sprintfTileElement(str, tile, row, col, 1);
    len = (int)strlen(str->buf);
    if (half == TE_HALF_HIGH) {
        str->buf[len - 2] = str->buf[len - 1];
    }
    str->buf[len - 1] = '\0';
}

int
forEachTile(Kstring *kstr, unsigned int row, unsigned int col,