cast5 does now work
[gnupg.git] / tools / mpicalc.c
index 828b475..361b275 100644 (file)
@@ -1,5 +1,5 @@
 /* mpitest.c - test the mpi functions
- *     Copyright (c) 1997 by Werner Koch (dd9jn)
+ *     Copyright (C) 1998 Free Software Foundation, Inc.
  *
  * This is a RPN calculator; values must be given in hex.
  * Operaion is like dc(1) except that the input/output radix is
@@ -7,14 +7,14 @@
  * Addition operators: ++ and --. All operators must be delimeted by a blank
  *
  *
- * This file is part of G10.
+ * This file is part of GNUPG.
  *
- * G10 is free software; you can redistribute it and/or modify
+ * GNUPG is free software; you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
  * the Free Software Foundation; either version 2 of the License, or
  * (at your option) any later version.
  *
- * G10 is distributed in the hope that it will be useful,
+ * GNUPG is distributed in the hope that it will be useful,
  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  * GNU General Public License for more details.
@@ -31,6 +31,7 @@
 
 #include "util.h"
 #include "mpi.h"
+#include "i18n.h"
 
 #define STACKSIZE  100
 static MPI stack[STACKSIZE];
@@ -62,6 +63,21 @@ strusage( int level )
 
 
 static void
+i18n_init(void)
+{
+  #ifdef ENABLE_NLS
+    #ifdef HAVE_LC_MESSAGES
+       setlocale( LC_MESSAGES, "" );
+    #else
+       setlocale( LC_ALL, "" );
+    #endif
+    bindtextdomain( PACKAGE, G10_LOCALEDIR );
+    textdomain( PACKAGE );
+  #endif
+}
+
+
+static void
 do_add(void)
 {
     if( stackidx < 2 ) {
@@ -159,7 +175,7 @@ do_inv(void)
        fputs("stack underflow\n", stderr);
        return;
     }
-    mpi_inv_mod( a, stack[stackidx-2], stack[stackidx-1] );
+    mpi_invm( a, stack[stackidx-2], stack[stackidx-1] );
     mpi_set(stack[stackidx-2],a);
     mpi_free(a);
     stackidx--;
@@ -201,6 +217,7 @@ main(int argc, char **argv)
     char strbuf[1000];
     int stridx=0;
 
+    i18n_init();
     while( arg_parse( &pargs, opts) ) {
        switch( pargs.r_opt ) {
          default : pargs.err = 2; break;