Exemplo n.º 1
0
static void GotoLine( a_window *wnd )
{
    long        line;
    mad_radix   old_radix;
    wnd_row     curr_row;
    int         curr_piece;

    old_radix = NewCurrRadix( 10 );
    WndGetCurrent( wnd, &curr_row, &curr_piece );
    if( curr_row < 0 || curr_row == WND_NO_ROW ) {
        line = WndTop( wnd );
    } else {
        line = curr_row;
    }
    ++line;
    if( DlgLongExpr( LIT_DUI( New_Line ), &line ) ) {
        --line;
        WndDirtyCurr( wnd );
        Centre( wnd, line );
        WndNewCurrent( wnd, line, PIECE_SOURCE );
    }
    NewCurrRadix( old_radix );
}
Exemplo n.º 2
0
static void GotoLine( a_window *wnd )
{
    long        line;
    unsigned    old;
    wnd_row     row;
    int         piece;

    old = NewCurrRadix( 10 );
    WndGetCurrent( wnd, &row, &piece );
    if( row < 0 || row == WND_NO_ROW ) {
        line = WndTop( wnd );
    } else {
        line = row;
    }
    ++line;
    if( DlgLongExpr( LIT( New_Line ), &line ) ) {
        --line;
        WndDirtyCurr( wnd );
        Centre( wnd, line );
        WndNewCurrent( wnd, line, PIECE_SOURCE );
    }
    NewCurrRadix( old );
}