Import Geant4 9.5.0 source tree

source/interfaces/basic/src/G4UIArrayString.cc

@@ -24,8 +24,8 @@
 // ********************************************************************
 //
 //
-// $Id: G4UIArrayString.cc,v 1.8 2006/06/29 19:09:43 gunter Exp $
-// GEANT4 tag $Name: geant4-09-02 $
+// $Id: G4UIArrayString.cc,v 1.8 2006-06-29 19:09:43 gunter Exp $
+// GEANT4 tag $Name: not supported by cvs2svn $
 //
 
 #include <iomanip>

source/interfaces/basic/src/G4UIWin32.cc

@@ -24,8 +24,8 @@
 // ********************************************************************
 //
 //
-// $Id: G4UIWin32.cc,v 1.13 2006/06/29 19:09:45 gunter Exp $
-// GEANT4 tag $Name: geant4-09-02 $
+// $Id: G4UIWin32.cc,v 1.13 2006-06-29 19:09:45 gunter Exp $
+// GEANT4 tag $Name: not supported by cvs2svn $
 //
 // G.Barrand
 

source/interfaces/basic/src/G4UIXaw.cc

@@ -24,8 +24,8 @@
 // ********************************************************************
 //
 //
-// $Id: G4UIXaw.cc,v 1.6 2006/06/29 19:09:47 gunter Exp $
-// GEANT4 tag $Name: geant4-09-02 $
+// $Id: G4UIXaw.cc,v 1.6 2006-06-29 19:09:47 gunter Exp $
+// GEANT4 tag $Name: not supported by cvs2svn $
 //
 // G.Barrand
 
@@ -201,9 +201,9 @@ void G4UIXaw::ExitHelp(
 /***************************************************************************/
 /***************************************************************************/
 void G4UIXaw::Callback (
- Widget a_widget
+ Widget
 ,XtPointer a_tag
-,XtPointer a_data
+,XtPointer
 )
 /***************************************************************************/
 /*!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!*/
@@ -225,8 +225,8 @@ void G4UIXaw::Callback (
   XtSetArg     (args[0],XtNvalue,"");
   XtSetValues  (dialog,args,1);
 
-  a_widget     = NULL;
-  a_data       = NULL;
+  //a_widget     = NULL;  Not used (1st argument).  Comment out to avoid compiler warnings. (JA)
+  //a_data       = NULL;  Not used (3rd argument).  Comment out to avoid compiler warnings. (JA)
 }
 //////////////////////////////////////////////////////////////////////////////
 G4bool ConvertStringToInt(

source/interfaces/basic/src/G4UIXm.cc

@@ -24,8 +24,8 @@
 // ********************************************************************
 //
 //
-// $Id: G4UIXm.cc,v 1.15 2008/11/14 16:21:42 lgarnier Exp $
-// GEANT4 tag $Name: geant4-09-02 $
+// $Id: G4UIXm.cc,v 1.15 2008-11-14 16:21:42 lgarnier Exp $
+// GEANT4 tag $Name: not supported by cvs2svn $
 //
 // G.Barrand
 
@@ -357,7 +357,7 @@ G4String G4UIXm::GetCommand (
 /***************************************************************************/
 /***************************************************************************/
 void G4UIXm::CommandEnteredCallback (
- Widget    a_widget
+ Widget
 ,XtPointer a_tag
 ,XtPointer a_data
 )
@@ -378,7 +378,7 @@ void G4UIXm::CommandEnteredCallback (
     This->ApplyShellCommand (command,exitSession,exitPause);
   }
 
-  a_widget = NULL;
+  //a_widget     = NULL;  Not used (1st argument).  Comment out to avoid compiler warnings. (JA)
   a_tag    = NULL;
 }
 /***************************************************************************/

source/interfaces/basic/src/G4UIcsh.cc

@@ -24,8 +24,8 @@
 // ********************************************************************
 //
 //
-// $Id: G4UIcsh.cc,v 1.8 2006/06/29 19:09:51 gunter Exp $
-// GEANT4 tag $Name: geant4-09-02 $
+// $Id: G4UIcsh.cc,v 1.8 2006-06-29 19:09:51 gunter Exp $
+// GEANT4 tag $Name: not supported by cvs2svn $
 //
 
 #include "G4UIcsh.hh"

source/interfaces/basic/src/G4UItcsh.cc

@@ -24,8 +24,8 @@
 // ********************************************************************
 //
 //
-// $Id: G4UItcsh.cc,v 1.17 2008/07/18 06:37:06 kmura Exp $
-// GEANT4 tag $Name: geant4-09-02 $
+// $Id: G4UItcsh.cc,v 1.17 2008-07-18 06:37:06 kmura Exp $
+// GEANT4 tag $Name: not supported by cvs2svn $
 //
 
 #ifndef WIN32
@@ -603,29 +603,29 @@ G4String G4UItcsh::ReadLine()
     // treatment for ESC. character
     if( cc == AsciiESC) { // ESC
       G4cin.get(cc);
-      if (cc == '[' || 'O') { // care for another termcap, such as konsole
-	G4cin.get(cc);
-	switch(cc) {
-	case 'A': // [UP]
-	  cc = 'P' - '@';
-	  PreviousCommand();  // ... show previous commad
-	  break;
-	case 'B': // [DOWN]
-	  cc = 'N' - '@';
-	  NextCommand();  // ... show next commad
-	  break;
-	case 'C': // [RIGHT]
-	  cc = 'F' - '@';
-	  ForwardCursor();   // ... forward cursor
-	  break;
-	case 'D': // [LEFT]
-	  cc = 'B' - '@';
-	  BackwardCursor();      // ... backward cursor
-	  break;
-	default:  // who knows !?
-	  cc = 0;
-	  break;
-	}
+      if (cc == '[' || cc == 'O') { // care for another termcap, such as konsole
+        G4cin.get(cc);
+        switch(cc) {
+        case 'A': // [UP]
+          cc = 'P' - '@';
+          PreviousCommand();  // ... show previous commad
+          break;
+        case 'B': // [DOWN]
+          cc = 'N' - '@';
+          NextCommand();  // ... show next commad
+          break;
+        case 'C': // [RIGHT]
+          cc = 'F' - '@';
+          ForwardCursor();   // ... forward cursor
+          break;
+        case 'D': // [LEFT]
+          cc = 'B' - '@';
+          BackwardCursor();      // ... backward cursor
+          break;
+        default:  // who knows !?
+          cc = 0;
+          break;
+        }
       }
     }
 

source/interfaces/basic/src/G4UIterminal.cc

@@ -24,8 +24,8 @@
 // ********************************************************************
 //
 //
-// $Id: G4UIterminal.cc,v 1.28 2008/07/18 06:38:59 kmura Exp $
-// GEANT4 tag $Name: geant4-09-02 $
+// $Id: G4UIterminal.cc,v 1.28 2008-07-18 06:38:59 kmura Exp $
+// GEANT4 tag $Name: not supported by cvs2svn $
 //
 // ====================================================================
 //   G4UIterminal.cc
@@ -69,8 +69,10 @@ static void SignalHandler(G4int)
     G4cout << G4endl
            << "Session terminated." << G4endl;
     theshell-> ResetTerminal();
-    G4Exception("G4UIterminal/SignalHandler", "KeyboardInterrupt",
-                FatalException, "Interrupt with Ctrl-C");
+    G4Exception("G4UIterminal::SignalHandler()",
+                "UI0001",
+                FatalException, 
+                "KeyboardInterrput with Ctrl-C");
   }
 
   // for original Unix / System V

source/interfaces/basic/src/G4VUIshell.cc

@@ -24,8 +24,8 @@
 // ********************************************************************
 //
 //
-// $Id: G4VUIshell.cc,v 1.10 2007/06/14 05:44:58 kmura Exp $
-// GEANT4 tag $Name: geant4-09-02 $
+// $Id: G4VUIshell.cc,v 1.10 2007-06-14 05:44:58 kmura Exp $
+// GEANT4 tag $Name: not supported by cvs2svn $
 //
 
 #include "G4UImanager.hh"