X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/d5939a20fd8f506225296ebe7de0180c7adb088e..032bc940fcde34cc649eaa111cd6aff1cda66104:/utils/HelpGen/src/scriptbinder.cpp?ds=sidebyside diff --git a/utils/HelpGen/src/scriptbinder.cpp b/utils/HelpGen/src/scriptbinder.cpp index f20a5f675e..affd6634e4 100644 --- a/utils/HelpGen/src/scriptbinder.cpp +++ b/utils/HelpGen/src/scriptbinder.cpp @@ -6,7 +6,7 @@ // Created: 22/09/98 // RCS-ID: $Id$ // Copyright: (c) Aleskandars Gluchovas -// Licence: wxWindows licence +// Licence: wxWindows licence ///////////////////////////////////////////////////////////////////////////// // For compilers that support precompilation, includes "wx/wx.h". @@ -20,9 +20,6 @@ #include "wx/wx.h" #endif -#ifndef __DARWIN__ -# include -#endif #include #include @@ -33,588 +30,588 @@ // helper functions -static size_t log2(size_t nr) +static size_t wx_log2(size_t nr) { - size_t tmp = 0; - while (nr >= 2 ) - { - nr /= 2; - ++tmp; - } - - return tmp; + size_t tmp = 0; + while (nr >= 2 ) + { + nr /= 2; + ++tmp; + } + + return tmp; } /***** Implementation for class ScriptStream *****/ ScriptStream::ScriptStream() - : mpBuf(0), - mSize(0), - mCapacity(0) + : m_pBuf(0), + m_Size(0), + m_Capacity(0) {} ScriptStream::~ScriptStream() { - if ( mpBuf ) delete mpBuf; + if ( m_pBuf ) delete m_pBuf; } void ScriptStream::WriteBytes( const void* srcBuf, size_t count ) { - if ( !count ) return; + if ( !count ) return; - // increase the capacity if necessary - if ( mSize + count > mCapacity ) - { - mCapacity = - ( 0x2 << (log2( mSize + count ) + 1 ) ); + // increase the capacity if necessary + if ( m_Size + count > m_Capacity ) + { + m_Capacity = + ( 0x2 << (wx_log2( m_Size + count ) + 1 ) ); - if ( mCapacity < 128 ) mCapacity = 128; + if ( m_Capacity < 128 ) m_Capacity = 128; - char* oldBuf = mpBuf; + char* oldBuf = m_pBuf; - mpBuf = new char[mCapacity]; + m_pBuf = new char[m_Capacity]; - if ( oldBuf ) - { - memcpy( mpBuf, oldBuf, mSize ); - delete oldBuf; - } - } + if ( oldBuf ) + { + memcpy( m_pBuf, oldBuf, m_Size ); + delete oldBuf; + } + } - // append new data - memcpy( &mpBuf[mSize], srcBuf, count ); + // append new data + memcpy( &m_pBuf[m_Size], srcBuf, count ); - mSize += count; + m_Size += count; } ScriptStream& ScriptStream::operator<<( const char* str ) { - WriteBytes( str, strlen( str ) ); + WriteBytes( str, strlen( str ) ); - return *this; + return *this; } -ScriptStream& ScriptStream::operator<<( const string& str ) +ScriptStream& ScriptStream::operator<<( const wxString& str ) { - if ( str.length() < 512 ) - { - char buf[512]; - size_t len = str.length(); + if ( str.length() < 512 ) + { + char buf[512]; + size_t len = str.length(); - for( size_t i = 0; i != len; ++i ) - buf[i] = str[i]; + for( size_t i = 0; i != len; ++i ) + buf[i] = str[i]; - WriteBytes( buf, len ); - } - else - WriteBytes( str.c_str(), str.length() ); + WriteBytes( buf, len ); + } + else + WriteBytes( str.c_str(), str.length() ); - return *this; + return *this; } ScriptStream& ScriptStream::operator<<( char ch ) { - WriteBytes( &ch, 1 ); + WriteBytes( &ch, 1 ); - return *this; + return *this; } void ScriptStream::endl() { - char ch = '\n'; - WriteBytes( &ch, 1 ); + char ch = '\n'; + WriteBytes( &ch, 1 ); } /***** Implementation for class ScriptTemplate *****/ -ScriptTemplate::ScriptTemplate( const string& templateText ) +ScriptTemplate::ScriptTemplate( const wxString& templateText ) { - string tmp = templateText; + wxString tmp = templateText; - mTText = (char*)malloc( tmp.length() + 1 ); + m_TText = (char*)malloc( tmp.length() + 1 ); - strcpy( mTText, tmp.c_str() ); + strcpy( m_TText, tmp.c_str() ); } ScriptTemplate::~ScriptTemplate() { - for( size_t i = 0; i != mVars.size(); ++i ) + for( size_t i = 0; i != m_Vars.size(); ++i ) - delete mVars[i]; + delete m_Vars[i]; - free( mTText ); + free( m_TText ); } bool ScriptTemplate::HasVar( const char* name ) { - for( size_t i = 0; i != mVars.size(); ++i ) + for( size_t i = 0; i != m_Vars.size(); ++i ) - if ( strcmp( mVars[i]->mName, name ) == 0 ) + if ( strcmp( m_Vars[i]->m_Name, name ) == 0 ) - return 1; + return 1; - return 0; + return 0; } void ScriptTemplate::AddStringVar ( const char* name, int ofs ) { - mVars.push_back( new TVarInfo( name, ofs, TVAR_STRING ) ); + m_Vars.push_back( new TVarInfo( name, ofs, TVAR_STRING ) ); } void ScriptTemplate::AddIntegerVar( const char* name, int ofs ) { - mVars.push_back( new TVarInfo( name, ofs, TVAR_INTEGER ) ); + m_Vars.push_back( new TVarInfo( name, ofs, TVAR_INTEGER ) ); } void ScriptTemplate::AddDoubleVar ( const char* name, int ofs ) { - mVars.push_back( new TVarInfo( name, ofs, TVAR_DOUBLE ) ); + m_Vars.push_back( new TVarInfo( name, ofs, TVAR_DOUBLE ) ); } void ScriptTemplate::AddObjectRefArray( const char* name, - int ofsRefToFirstObj, - int ofsObjSizeInt, - int ofsObjRefTempl - ) + int ofsRefToFirstObj, + int ofsObjSizeInt, + int ofsObjRefTempl + ) { - TArrayInfo* pInfo = new TArrayInfo( name ); + TArrayInfo* pInfo = new TArrayInfo( name ); - mVars.push_back( pInfo ); + m_Vars.push_back( pInfo ); - pInfo->mRefOfs = ofsRefToFirstObj; - pInfo->mSizeIntOfs = ofsObjSizeInt; - pInfo->mObjRefTemplOfs = ofsObjRefTempl; + pInfo->m_RefOfs = ofsRefToFirstObj; + pInfo->m_SizeIntOfs = ofsObjSizeInt; + pInfo->m_ObjRefTemplOfs = ofsObjRefTempl; } -inline void ScriptTemplate::PrintVar( TVarInfo* pInfo, - void* dataObj, - ScriptStream& stm ) +inline void ScriptTemplate::PrintVar( TVarInfo* pInfo, + void* dataObj, + ScriptStream& stm ) { - char buf[128]; - - switch ( pInfo->mType ) - { - case TVAR_INTEGER : - { - sprintf(buf, "%d",*( (int*) ((char*)dataObj + pInfo->mOfs) ) ); - - stm.WriteBytes( buf, strlen(buf ) ); - break; - } - - case TVAR_STRING : - { - string& str = *( (string*) ((char*)dataObj+pInfo->mOfs) ); - - const char* cs = str.c_str(); + char buf[128]; + + switch ( pInfo->m_Type ) + { + case TVAR_INTEGER : + { + sprintf(buf, "%d",*( (int*) ((char*)dataObj + pInfo->m_Ofs) ) ); + + stm.WriteBytes( buf, strlen(buf ) ); + break; + } + + case TVAR_STRING : + { + wxString& str = *( (wxString*) ((char*)dataObj+pInfo->m_Ofs) ); + + const char* cs = str.c_str(); #ifdef DEBUG_WEIRED_OFFSETS - cout << "DBG:: cs address is " << (int)cs << endl; - cout << "DBG:: str address is " << (int)(&str) << endl; - cout << "DBG:: dataObj points to " << (int)dataObj << endl; - cout << "DBG:: pInfo->mOfs value is " << (int)pInfo->mOfs << endl; - cout << "DBG:: d+pInfo->mOfs is " << (int)((char*)dataObj + pInfo->mOfs) << endl; - cout << "DBG:: pInfo->mName is " << pInfo->mName << endl; - cout << "DBG:: pInfo->mType is " << pInfo->mType << endl; - cout << "DBG:: end of dump. " << endl; - - cout << "DBG:: cs value is " << endl << cs << endl; + cout << "DBG:: cs address is " << (int)cs << endl; + cout << "DBG:: str address is " << (int)(&str) << endl; + cout << "DBG:: dataObj points to " << (int)dataObj << endl; + cout << "DBG:: pInfo->m_Ofs value is " << (int)pInfo->m_Ofs << endl; + cout << "DBG:: d+pInfo->m_Ofs is " << (int)((char*)dataObj + pInfo->m_Ofs) << endl; + cout << "DBG:: pInfo->m_Name is " << pInfo->m_Name << endl; + cout << "DBG:: pInfo->m_Type is " << pInfo->m_Type << endl; + cout << "DBG:: end of dump. " << endl; + + cout << "DBG:: cs value is " << endl << cs << endl; #endif - stm.WriteBytes( cs, strlen(cs) ); - break; - } - - case TVAR_DOUBLE : - { - sprintf( buf, "%f", - *( (double*)( (char*)dataObj+pInfo->mOfs) ) ); - - stm.WriteBytes( buf, strlen(buf ) ); - break; - } - - case TVAR_REF_ARRAY : - { - TArrayInfo& info = *((TArrayInfo*)pInfo); - - int sz = *((int*) ( (char*)dataObj+info.mSizeIntOfs )); - if ( !sz ) - { - // DBG:: - int u = 0; - ++u; - break; - } - - int* array = *((int**)( (char*)dataObj+info.mRefOfs )); - - ScriptTemplate* pRefTempl; - - for( int i = 0; i != sz; ++i ) - { - pRefTempl = - *((ScriptTemplate**)((char*)(array[i])+info.mObjRefTemplOfs)); - - pRefTempl->PrintScript( (void*)array[i], stm ); - } - - break; - } - - default : break; - } + stm.WriteBytes( cs, strlen(cs) ); + break; + } + + case TVAR_DOUBLE : + { + sprintf( buf, "%f", + *( (double*)( (char*)dataObj+pInfo->m_Ofs) ) ); + + stm.WriteBytes( buf, strlen(buf ) ); + break; + } + + case TVAR_REF_ARRAY : + { + TArrayInfo& info = *((TArrayInfo*)pInfo); + + int sz = *((int*) ( (char*)dataObj+info.m_SizeIntOfs )); + if ( !sz ) + { + // DBG:: + int u = 0; + ++u; + break; + } + + int* array = *((int**)( (char*)dataObj+info.m_RefOfs )); + + ScriptTemplate* pRefTempl; + + for( int i = 0; i != sz; ++i ) + { + pRefTempl = + *((ScriptTemplate**)((char*)(array[i])+info.m_ObjRefTemplOfs)); + + pRefTempl->PrintScript( (void*)array[i], stm ); + } + + break; + } + + default : break; + } } void ScriptTemplate::PrintScript( void* dataObj, ScriptStream& stm ) { - char* cur = mTText; + char* cur = m_TText; - // template parsing loop - do - { - char* start = cur; + // template parsing loop + do + { + char* start = cur; - while( *cur != '\0' && *cur != '$' ) ++cur; + while( *cur != '\0' && *cur != '$' ) ++cur; - // flush text collected between variables - stm.WriteBytes( start, cur - start ); + // flush text collected between variables + stm.WriteBytes( start, cur - start ); - if ( *cur == '\0' ) break; + if ( *cur == '\0' ) break; - cur += 2; // skip to the name of the var + cur += 2; // skip to the name of the var - start = cur; + start = cur; - while( *cur != ')' ) ++cur; + while( *cur != ')' ) ++cur; - // put terminating zero temorarely + // put terminating zero temorarely - *cur = '\0'; + *cur = '\0'; - // look up variable + // look up variable - size_t sz = mVars.size(); - bool found = 0; + size_t sz = m_Vars.size(); + // bool found = false; - for( size_t i = 0; i != sz; ++i ) - { - if ( strcmp( mVars[i]->mName, start ) == 0 ) - { - PrintVar( mVars[i], dataObj, stm ); + for( size_t i = 0; i != sz; ++i ) + { + if ( strcmp( m_Vars[i]->m_Name, start ) == 0 ) + { + PrintVar( m_Vars[i], dataObj, stm ); - *cur = ')'; // remove terminating zero - ++cur; - found = 1; - break; - } - } + *cur = ')'; // remove terminating zero + ++cur; + // found = 1; + break; + } + } - // variable referred by template script is not - // registered to this tempalte object - // ASSERT( found ); + // variable referred by template script is not + // registered to this tempalte object + // ASSERT( found ); - } while(1); + } while(1); } /***** implementation for class ScriptSection *****/ -int ScriptSection::mIdCounter = 0; +int ScriptSection::m_IdCounter = 0; -ScriptSection::ScriptSection( const string& name, - const string& body, - ScriptTemplate* pSectionTemplate, - ScriptTemplate* pReferenceTemplate, - bool autoHide, - bool sorted - ) - : mpParent ( NULL ), +ScriptSection::ScriptSection( const wxString& name, + const wxString& body, + ScriptTemplate* pSectionTemplate, + ScriptTemplate* pReferenceTemplate, + bool autoHide, + bool sorted + ) + : m_pParent ( NULL ), - mName ( name ), - mBody ( body ), + m_Name ( name ), + m_Body ( body ), - mAutoHide( autoHide ), - mSortOn ( sorted ), + m_AutoHide ( autoHide ), + m_SortOn ( sorted ), - mpSectTempl( pSectionTemplate ), - mpRefTempl ( pReferenceTemplate ), + m_pSectTempl( pSectionTemplate ), + m_pRefTempl ( pReferenceTemplate ), - mRefCount( 0 ), - mArrSize( 0 ) + m_RefCount( 0 ), + m_ArrSize( 0 ) { - // generate GUID + // generate GUID - char buf[32]; - sprintf( buf, "%d", ++mIdCounter ); - mId = buf; + wxChar buf[32]; + wxSprintf( buf, _T("%d"), ++m_IdCounter ); + m_Id = buf; } ScriptSection::~ScriptSection() { - SectListT lst = mSubsections; + SectListT lst = m_Subsections; - while( mSubsections.size() ) + while( m_Subsections.size() ) - mSubsections[0]->RemoveRef(); + m_Subsections[0]->RemoveRef(); - for( size_t i = 0; i != mReferences.size(); ++i ) + for( size_t i = 0; i != m_References.size(); ++i ) - mReferences[i]->RemoveRef(); + m_References[i]->RemoveRef(); } void ScriptSection::AddRef() { - ++mRefCount; + ++m_RefCount; } void ScriptSection::RemoveRef() { - if ( !mRefCount || !(--mRefCount) ) - { - if (mpParent) - { - // remove ourselves from parent's list - - SectListT& lst = mpParent->mSubsections; - for( size_t i = 0; i != lst.size(); ++i ) - - if ( lst[i] == this ) - { - lst.erase( &lst[i] ); - break; - } - } - - delete this; - } + if ( !m_RefCount || !(--m_RefCount) ) + { + if (m_pParent) + { + // remove ourselves from parent's list + + SectListT& lst = m_pParent->m_Subsections; + for( size_t i = 0; i != lst.size(); ++i ) + + if ( lst[i] == this ) + { + lst.erase( &lst[i] ); + break; + } + } + + delete this; + } } ScriptSection* ScriptSection::GetSubsection( const char* name ) { - // FOR NOW:: fixed section name length - char buf[128]; + // FOR NOW:: fixed section name length + char buf[128]; - size_t cur = 0; + size_t cur = 0; - while( name[cur] && name[cur] != '/' ) - { - buf[cur] = name[cur]; - ++cur; - } + while( name[cur] && name[cur] != '/' ) + { + buf[cur] = name[cur]; + ++cur; + } - // ASSERT( cur < sizeof(buf) ); + // ASSERT( cur < sizeof(buf) ); - buf[cur] = '\0'; + buf[cur] = '\0'; - size_t sz = mSubsections.size(); + size_t sz = m_Subsections.size(); - for( size_t i = 0; i != sz; ++i ) - { - // DBG:: - //ScriptSection& sect = *mSubsections[i]; + for( size_t i = 0; i != sz; ++i ) + { + // DBG:: + //ScriptSection& sect = *m_Subsections[i]; - if ( mSubsections[i]->mName == buf ) - { - if ( name[cur] == '/' ) + if ( m_Subsections[i]->m_Name == buf ) + { + if ( name[cur] == '/' ) - // search recursivelly - return mSubsections[i]->GetSubsection( &name[cur+1] ); - else - return mSubsections[i]; - } - } + // search recursivelly + return m_Subsections[i]->GetSubsection( &name[cur+1] ); + else + return m_Subsections[i]; + } + } - return 0; + return 0; } void ScriptSection::AddSection( ScriptSection* pSection, - bool addToReferencesToo - ) + bool addToReferencesToo + ) { - mSubsections.push_back( pSection ); + m_Subsections.push_back( pSection ); - pSection->AddRef(); + pSection->AddRef(); - // can add section to multiple containers - // ASSERT( pSection->mpParent == 0 ); + // can add section to multiple containers + // ASSERT( pSection->m_pParent == 0 ); - pSection->mpParent = this; + pSection->m_pParent = this; - if ( addToReferencesToo ) + if ( addToReferencesToo ) - AddReference( pSection ); + AddReference( pSection ); } void ScriptSection::AddReference( ScriptSection* pReferredSection ) { - mReferences.push_back( pReferredSection ); + m_References.push_back( pReferredSection ); - pReferredSection->AddRef(); + pReferredSection->AddRef(); - // set up mandatory fields used by ScriptTemplate - mArrSize = mReferences.size(); - if ( mArrSize ) - mRefFirst = (void*)&mReferences[0]; + // set up mandatory fields used by ScriptTemplate + m_ArrSize = m_References.size(); + if ( m_ArrSize ) + m_RefFirst = (void*)&m_References[0]; } SectListT& ScriptSection::GetSubsections() { - return mSubsections; + return m_Subsections; } // static method: void ScriptSection::RegisterTemplate( ScriptTemplate& sectionTempalte ) { - int nameOfs, bodyOfs, idOfs, - arrRefOfs, arrSizeOfs, refTemplOfs; + int nameOfs, bodyOfs, idOfs, + arrRefOfs, arrSizeOfs, refTemplOfs; + + // obtaining offsets of member vars - // obtaining offsets of member vars - - GET_VAR_OFS( ScriptSection, mName, &nameOfs ) - GET_VAR_OFS( ScriptSection, mBody, &bodyOfs ) - GET_VAR_OFS( ScriptSection, mId, &idOfs ) - GET_VAR_OFS( ScriptSection, mRefFirst, &arrRefOfs ) - GET_VAR_OFS( ScriptSection, mArrSize, &arrSizeOfs ) + GET_VAR_OFS( ScriptSection, m_Name, &nameOfs ) + GET_VAR_OFS( ScriptSection, m_Body, &bodyOfs ) + GET_VAR_OFS( ScriptSection, m_Id, &idOfs ) + GET_VAR_OFS( ScriptSection, m_RefFirst,&arrRefOfs ) + GET_VAR_OFS( ScriptSection, m_ArrSize, &arrSizeOfs ) - GET_VAR_OFS( ScriptSection, mpRefTempl, &refTemplOfs ) + GET_VAR_OFS( ScriptSection, m_pRefTempl, &refTemplOfs ) - // registering member variables with given script template + // registering member variables with given script template - sectionTempalte.AddStringVar( "NAME", nameOfs ); - sectionTempalte.AddStringVar( "BODY", bodyOfs ); - sectionTempalte.AddStringVar( "ID", idOfs ); + sectionTempalte.AddStringVar( "NAME", nameOfs ); + sectionTempalte.AddStringVar( "BODY", bodyOfs ); + sectionTempalte.AddStringVar( "ID", idOfs ); - sectionTempalte.AddObjectRefArray( "REFLIST", - arrRefOfs, arrSizeOfs, refTemplOfs ); + sectionTempalte.AddObjectRefArray( "REFLIST", + arrRefOfs, arrSizeOfs, refTemplOfs ); } void ScriptSection::Print( ScriptStream& stm ) { - // TBD:: sorting + // TBD:: sorting - // print out this content first - if ( mpSectTempl ) + // print out this content first + if ( m_pSectTempl ) - mpSectTempl->PrintScript( this, stm ); + m_pSectTempl->PrintScript( this, stm ); - // attach contents subsections at the end of this content + // attach contents subsections at the end of this content - for( size_t i = 0; i != mSubsections.size(); ++i ) + for( size_t i = 0; i != m_Subsections.size(); ++i ) - mSubsections[i]->Print( stm ); + m_Subsections[i]->Print( stm ); } void ScriptSection::DoRemoveEmptySections(int& nRemoved, SectListT& removedLst) { - for( size_t i = 0; i != mSubsections.size(); ++i ) - { - ScriptSection& sect = *mSubsections[i]; - - sect.DoRemoveEmptySections( nRemoved, removedLst ); - - if (sect.mAutoHide ) - - if ( sect.mReferences.size() == 0 ) - { - bool found = 0; - for( size_t k = 0; k != removedLst.size(); ++k ) - - if ( removedLst[k] == § ) - { - found = 1; - break; - } - - if ( !found ) - { - removedLst.push_back( § ); - ++nRemoved; - - delete § - --i; - } - } - } + for( size_t i = 0; i != m_Subsections.size(); ++i ) + { + ScriptSection& sect = *m_Subsections[i]; + + sect.DoRemoveEmptySections( nRemoved, removedLst ); + + if (sect.m_AutoHide ) + + if ( sect.m_References.size() == 0 ) + { + bool found = false; + for( size_t k = 0; k != removedLst.size(); ++k ) + + if ( removedLst[k] == § ) + { + found = 1; + break; + } + + if ( !found ) + { + removedLst.push_back( § ); + ++nRemoved; + + delete § + --i; + } + } + } } void ScriptSection::DoRemoveDeadLinks( SectListT& removedLst) { - size_t dsz = removedLst.size(); - - for( size_t i = 0; i != mSubsections.size(); ++i ) - { - mSubsections[i]->DoRemoveDeadLinks( removedLst ); - } - - for( size_t n = 0; n != mReferences.size(); ++n ) - { - for( size_t k = 0; k != dsz; ++k ) - - if ( removedLst[k] == mReferences[n] ) - { - mReferences.erase( &mReferences[n] ); - --n; - - // set up mandatory fields used by ScriptTemplate - mArrSize = mReferences.size(); - if ( mArrSize ) - mRefFirst = (void*)&mReferences[0]; - - break; - } - } + size_t dsz = removedLst.size(); + + for( size_t i = 0; i != m_Subsections.size(); ++i ) + { + m_Subsections[i]->DoRemoveDeadLinks( removedLst ); + } + + for( size_t n = 0; n != m_References.size(); ++n ) + { + for( size_t k = 0; k != dsz; ++k ) + + if ( removedLst[k] == m_References[n] ) + { + m_References.erase( &m_References[n] ); + --n; + + // set up mandatory fields used by ScriptTemplate + m_ArrSize = m_References.size(); + if ( m_ArrSize ) + m_RefFirst = (void*)&m_References[0]; + + break; + } + } } void ScriptSection::RemoveEmptySections() { - // FIXME:: this is very_very_very slow alg.! +"doesn't work" + // FIXME:: this is very_very_very slow alg.! +"doesn't work" - int nRemoved = 0; + int nRemoved = 0; - do - { - SectListT removedLst; - nRemoved = 0; + do + { + SectListT removedLst; + nRemoved = 0; - DoRemoveEmptySections( nRemoved, removedLst ); + DoRemoveEmptySections( nRemoved, removedLst ); - DoRemoveDeadLinks( removedLst ); - } - while( nRemoved ); + DoRemoveDeadLinks( removedLst ); + } + while( nRemoved ); } /***** Iimplementation for class DocGeneratorBase *****/ -bool DocGeneratorBase::SaveDocument( const char* fname, - const char* fopenOptions, - ScriptSection* pFromSection - ) +bool DocGeneratorBase::SaveDocument( const char* fname, + const char* fopenOptions, + ScriptSection* pFromSection + ) { - FILE* fp = fopen( fname, fopenOptions ); + FILE* fp = fopen( fname, fopenOptions ); - if ( (int)fp == -1 ) return 0; + if ( !fp ) return 0; - ScriptStream stm; + ScriptStream stm; - // check if derived class agrees about saving it - if ( !OnSaveDocument( stm ) ) return 0; + // check if derived class agrees about saving it + if ( !OnSaveDocument( stm ) ) return 0; - if ( pFromSection ) + if ( pFromSection ) - pFromSection->Print( stm ); - else - { - ScriptSection* pTopSect = GetTopSection(); - // ASSERT( pTopSect ); - pTopSect->Print( stm ); - } + pFromSection->Print( stm ); + else + { + ScriptSection* pTopSect = GetTopSection(); + // ASSERT( pTopSect ); + pTopSect->Print( stm ); + } - size_t nWrite = fwrite( stm.GetBuf(), 1, stm.GetBufSize(), fp ); + size_t nWrite = fwrite( stm.GetBuf(), 1, stm.GetBufSize(), fp ); - if ( nWrite != stm.GetBufSize() ) return 0; + if ( nWrite != stm.GetBufSize() ) return 0; - fclose( fp ); + fclose( fp ); - return 1; + return 1; - // that^s it + // that^s it }