C++ (Cpp) CfrTil_Quit Examples

Example #1

File: readTable.c Project: dennisj001/openvmtil

void
ReadTable_0x03 ( ReadLiner * rl ) //  <CTRL-C>
{
    if ( _Q_->OVT_LC && GetState ( _Q_->OVT_LC, LC_REPL ) )
    {
        ReadTable_Zero ( rl ) ;
    }
    else CfrTil_Quit ( ) ;
}

Example #2

File: file.c Project: 8l/openvmtil

void
File_Open ( )
{
    byte * filename = ( byte* ) _DataStack_Pop ( ) ;
    FILE * file = fopen ( ( char* ) filename, "r" ) ;
    if ( file == NULL )
    {
        perror ( "\nFile_Open error : " ) ;
        CfrTil_Quit ( ) ;
    }
    else _DataStack_Push ( ( int32 ) file ) ;
}

Example #3

File: file.c Project: 8l/openvmtil

void
File_Read ( )
{
    int32 size = _DataStack_Pop ( ) ;
    byte * ptr = ( byte * ) _DataStack_Pop ( ) ;
    FILE * file = ( FILE * ) _DataStack_Pop ( ) ;
    int32 result = fread ( ptr, size, 1, file ) ;
    _DataStack_Push ( result ) ;
    if ( result != size )
    {
        if ( ! feof ( file ) )
        {
            if ( ferror ( file ) )
            {
                perror ( "\nFile_Read error : " ) ;
                CfrTil_Quit ( ) ;
            }
        }
    }
}