fix some tests

[calc.git] / stack.c

diff --git a/stack.c b/stack.c
index a355fa5e3281b2fc34d1c3460c43701d776c99a2..f4117f5ce0fd397432933cc8062c219f6e15bbf0 100644 (file)
--- a/stack.c
+++ b/stack.c
@@ -62,12 +62,12 @@ double set (int nbops, element_t **ops)
 void show (void)
 {
     int i, n = size_tab (stack);
-    fprintf (stdout, "stack:");
+    printf ("stack:");
     for (i = 0; i < n; i++) {
-        fprintf (stdout, " ");
-        fprintf (stdout, minform, get_tab (stack, i + 1));
+        printf (" ");
+        printl (get_tab (stack, i + 1));
     }
-    fprintf (stdout, "\n");
+    printf ("\n");
 }
 
 /* stack functions */
@@ -124,12 +124,7 @@ double min ()
 
 void order ()
 {
-    int n = size_tab (stack);
-    if (n < 3) {
-        VERBOSE (WARNING, fprintf (stdout, "error not enough element in stack (%d)\n", n));
-    } else {
-        order_tab (stack);
-    }
+    order_tab (stack);
 }
 
 double median ()