Index: tol/btol/bdb/filehandle.cpp
===================================================================
--- tol/btol/bdb/filehandle.cpp	(revision 532b6fbea13e8f618ef14277bfc6923128f1c940)
+++ tol/btol/bdb/filehandle.cpp	(revision 5129d30f1b20337ab83edbd06278833f5227ebb9)
@@ -203,4 +203,5 @@
 /////////////////////////////////////////////////////////////////////////////
 {
+  if(CheckNonDeclarativeAction("FOpen")) { return; }
   static BText allowedAccess_ = " r w a rb wb ab r+ w+ a+ r+b w+b a+b ";
   BText& path   = Text(Arg(1));
@@ -246,4 +247,5 @@
 /////////////////////////////////////////////////////////////////////////////
 {
+  if(CheckNonDeclarativeAction("FGetText")) { return; }
   int handle  = (int)Real(Arg(1));
   int maxSize = (int)Real(Arg(2));
@@ -270,4 +272,5 @@
 /////////////////////////////////////////////////////////////////////////////
 {
+  if(CheckNonDeclarativeAction("FPutText")) { return; }
   int    handle = (int)Real(Arg(1));
   BText& txt    = Text(Arg(2));
@@ -293,4 +296,5 @@
 /////////////////////////////////////////////////////////////////////////////
 {
+  if(CheckNonDeclarativeAction("FEof")) { return; }
   int handle  = (int)Real(Arg(1));
   contens_ = EOF;
@@ -319,4 +323,5 @@
 /////////////////////////////////////////////////////////////////////////////
 {
+  if(CheckNonDeclarativeAction("FFlush")) { return; }
   int handle  = (int)Real(Arg(1));
   contens_ = EOF;
@@ -351,4 +356,5 @@
 /////////////////////////////////////////////////////////////////////////////
 {
+  if(CheckNonDeclarativeAction("FClose")) { return; }
   bool clean   = true;
   bool verbose = false;
Index: tol/btol/bdb/tol_filehandle.h
===================================================================
--- tol/btol/bdb/tol_filehandle.h	(revision 532b6fbea13e8f618ef14277bfc6923128f1c940)
+++ tol/btol/bdb/tol_filehandle.h	(revision 5129d30f1b20337ab83edbd06278833f5227ebb9)
@@ -19,4 +19,7 @@
    USA.
  */
+
+#ifndef TOL_FILEHANLER_H
+#define TOL_FILEHANLER_H
 
 #if defined(_MSC_VER)
@@ -57,3 +60,4 @@
 
 
+#endif // TOL_FILEHANLER_H
 
