Remove old API to announce data to thorn Formaline.

git-svn-id: http://svn.cactuscode.org/arrangements/CactusUtils/Formaline/trunk@133 83718e91-0e4f-0410-abf4-91180603181f

1 files changed, 0 insertions, 146 deletions

diff --git a/src/announce.cc b/src/announce.cc
index 9935201..6371627 100644
--- a/src/announce.cc
+++ b/src/announce.cc
@@ -1153,150 +1153,4 @@ namespace Formaline
 
 
 
-  extern "C"
-  void
-  Formaline_AnnounceBoolean (CCTK_POINTER_TO_CONST const cctkGH_,
-                             CCTK_INT              const value,
-                             CCTK_STRING           const key)
-  {
-    cGH const * const cctkGH = static_cast<cGH const *> (cctkGH_);
-    DECLARE_CCTK_PARAMETERS;
-    
-    // Only store from the root processor
-    if (CCTK_MyProc (cctkGH) != 0) return;
-    
-    // Announce
-    multistorage stores;
-    
-    if (announce_to_portal)
-    {
-      stores.add_storage (new portal (get_run_id (cctkGH), storage::update));
-    }
-    
-    if (send_as_rdf)
-    {
-      stores.add_storage
-        (new rdf (get_run_id (cctkGH), storage::update, cctkGH));
-    }
-    
-    if (store_into_file)
-    {
-      stores.add_storage (new file (get_run_id (cctkGH), storage::update));
-    }
-    
-    if (stores.num_storages() == 0) return;
-    
-    stores.store (key, static_cast <bool> (value));
-  }
-
-  extern "C"
-  void
-  Formaline_AnnounceInt (CCTK_POINTER_TO_CONST const cctkGH_,
-                         CCTK_INT              const value,
-                         CCTK_STRING           const key)
-  {
-    cGH const * const cctkGH = static_cast<cGH const *> (cctkGH_);
-    DECLARE_CCTK_PARAMETERS;
-    
-    // Only store from the root processor
-    if (CCTK_MyProc (cctkGH) != 0) return;
-    
-    // Announce
-    multistorage stores;
-    
-    if (announce_to_portal)
-    {
-      stores.add_storage (new portal (get_run_id (cctkGH), storage::update));
-    }
-    
-    if (send_as_rdf)
-    {
-      stores.add_storage
-        (new rdf (get_run_id (cctkGH), storage::update, cctkGH));
-    }
-    
-    if (store_into_file)
-    {
-      stores.add_storage (new file (get_run_id (cctkGH), storage::update));
-    }
-    
-    if (stores.num_storages() == 0) return;
-    
-    stores.store (key, value);
-  }
-
-  extern "C"
-  void
-  Formaline_AnnounceReal (CCTK_POINTER_TO_CONST const cctkGH_,
-                          CCTK_REAL             const value,
-                          CCTK_STRING           const key)
-  {
-    cGH const * const cctkGH = static_cast<cGH const *> (cctkGH_);
-    DECLARE_CCTK_PARAMETERS;
-    
-    // Only store from the root processor
-    if (CCTK_MyProc (cctkGH) != 0) return;
-    
-    // Announce
-    multistorage stores;
-    
-    if (announce_to_portal)
-    {
-      stores.add_storage (new portal (get_run_id (cctkGH), storage::update));
-    }
-    
-    if (send_as_rdf)
-    {
-      stores.add_storage
-        (new rdf (get_run_id (cctkGH), storage::update, cctkGH));
-    }
-    
-    if (store_into_file)
-    {
-      stores.add_storage (new file (get_run_id (cctkGH), storage::update));
-    }
-    
-    if (stores.num_storages() == 0) return;
-    
-    stores.store (key, value);
-  }
-
-  extern "C"
-  void
-  Formaline_AnnounceString (CCTK_POINTER_TO_CONST const cctkGH_,
-                            CCTK_STRING           const value,
-                            CCTK_STRING           const key)
-  {
-    cGH const * const cctkGH = static_cast<cGH const *> (cctkGH_);
-    DECLARE_CCTK_PARAMETERS;
-    
-    // Only store from the root processor
-    if (CCTK_MyProc (cctkGH) != 0) return;
-    
-    // Announce
-    multistorage stores;
-    
-    if (announce_to_portal)
-    {
-      stores.add_storage (new portal (get_run_id (cctkGH), storage::update));
-    }
-    
-    if (send_as_rdf)
-    {
-      stores.add_storage
-        (new rdf (get_run_id (cctkGH), storage::update, cctkGH));
-    }
-    
-    if (store_into_file)
-    {
-      stores.add_storage (new file (get_run_id (cctkGH), storage::update));
-    }
-    
-    if (stores.num_storages() == 0) return;
-    
-    stores.store (key, value);
-  }
-
-
-
 } // namespace Formaline