Ejemplo n.º 1
0
extern  void    BECloseFiles()
{
    int i;

    if( Actions != FStdOut() ) {
        FShut( Actions );
    }
    if( SymDebug != 0 ) {
        FShut( SymDebug );
    }
    if( TypDebug != 0 ) {
        FShut( TypDebug );
    }
    for( i = 0; i < MAX_SEG; ++i ) {
        if( Files[i].hdl != 0 ) {
            FShut( Files[i].hdl );
        }
    }
}
Ejemplo n.º 2
0
extern  void    BECloseFiles()
{
    int i;

    if( Actions != FStdOut() ) {
        FShut( Actions );
    }
    if( SymDebug != 0 ) {
        FShut( SymDebug );
    }
    if( TypDebug != 0 ) {
        FShut( TypDebug );
    }
    i = 0;
    while( i < MAX_SEG ) {
        if( Files[ i ].hdl != 0 ) {
            FShut( Files[ i ].hdl );
        }
        ++i;
    }
}
Ejemplo n.º 3
0
extern  void    BEFlushSeg( segment_id seg ) {
//============================================

    Action( "BEFlushSeg( %d )%n", seg );
    if( seg == CodeSeg ) {
        CodeSeg = -1;
    }
    if( Files[seg].hdl != 0 ) {
        FShut( Files[seg].hdl );
    }
    Files[seg].hdl = 0;
    Files[seg].exists = false;
    SegOk[seg] = false;
    StaticList = NULL;
}