original_string: public function delete_tables_from_xmldb_file($file) {
  
          $xmldb_file = new xmldb_file($file);
  
          if (!$xmldb_file->fileExists()) {
              throw new ddl_exception('ddlxmlfileerror', null, 'File does not exist');
          }
  
          $loaded    = $xmldb_file->loadXMLStructure();
          $structure = $xmldb_file->getStructure();
  
          if (!$loaded || !$xmldb_file->isLoaded()) {
              // Show info about the error if we can find it
              if ($structure) {
                  if ($errors = $structure->getAllErrors()) {
                      throw new ddl_exception('ddlxmlfileerror', null, 'Errors found in XMLDB file: '. implode (', ', $errors));
                  }
              }
              throw new ddl_exception('ddlxmlfileerror', null, 'not loaded??');
          }
  
          if ($xmldb_tables = $structure->getTables()) {
              // Delete in opposite order, this should help with foreign keys in the future.
              $xmldb_tables = array_reverse($xmldb_tables);
              foreach($xmldb_tables as $table) {
                  if ($this->table_exists($table)) {
                      $this->drop_table($table);
                  }
              }
          }
      }
code: public function delete_tables_from_xmldb_file($file) {
  
          $xmldb_file = new xmldb_file($file);
  
          if (!$xmldb_file->fileExists()) {
              throw new ddl_exception('ddlxmlfileerror', null, 'File does not exist');
          }
  
          $loaded    = $xmldb_file->loadXMLStructure();
          $structure = $xmldb_file->getStructure();
  
          if (!$loaded || !$xmldb_file->isLoaded()) {
              // Show info about the error if we can find it
              if ($structure) {
                  if ($errors = $structure->getAllErrors()) {
                      throw new ddl_exception('ddlxmlfileerror', null, 'Errors found in XMLDB file: '. implode (', ', $errors));
                  }
              }
              throw new ddl_exception('ddlxmlfileerror', null, 'not loaded??');
          }
  
          if ($xmldb_tables = $structure->getTables()) {
              // Delete in opposite order, this should help with foreign keys in the future.
              $xmldb_tables = array_reverse($xmldb_tables);
              foreach($xmldb_tables as $table) {
                  if ($this->table_exists($table)) {
                      $this->drop_table($table);
                  }
              }
          }
      }
code_tokens: public function delete_tables_from_xmldb_file ( $ file ) { $ xmldb_file = new xmldb_file ( $ file ) ; if ( ! $ xmldb_file -> fileExists ( ) ) { throw new ddl_exception ( 'ddlxmlfileerror' , null , 'File does not exist' ) ; } $ loaded = $ xmldb_file -> loadXMLStructure ( ) ; $ structure = $ xmldb_file -> getStructure ( ) ; if ( ! $ loaded || ! $ xmldb_file -> isLoaded ( ) ) { // Show info about the error if we can find it if ( $ structure ) { if ( $ errors = $ structure -> getAllErrors ( ) ) { throw new ddl_exception ( 'ddlxmlfileerror' , null , 'Errors found in XMLDB file: ' . implode ( ', ' , $ errors ) ) ; } } throw new ddl_exception ( 'ddlxmlfileerror' , null , 'not loaded??' ) ; } if ( $ xmldb_tables = $ structure -> getTables ( ) ) { // Delete in opposite order, this should help with foreign keys in the future. $ xmldb_tables = array_reverse ( $ xmldb_tables ) ; foreach ( $ xmldb_tables as $ table ) { if ( $ this -> table_exists ( $ table ) ) { $ this -> drop_table ( $ table ) ; } } } }
docstring: This function will delete all tables found in XMLDB file from db
  
  @param string $file Full path to the XML file to be used.
  @return void
docstring_tokens: This function will delete all tables found in XMLDB file from db