* restore.c: Make the code of caller0 correspond to its comment.
authorJim Blandy <jimb@codesourcery.com>
Mon, 7 May 2001 00:05:15 +0000 (00:05 +0000)
committerJim Blandy <jimb@codesourcery.com>
Mon, 7 May 2001 00:05:15 +0000 (00:05 +0000)
gdb/testsuite/ChangeLog
gdb/testsuite/gdb.base/restore.c

index 08f5ad6601a4231a5f83c68de63ecb856505e89c..9ba2c8d31c164fab1fdf74b34c1f4da0c1d64722 100644 (file)
@@ -1,3 +1,7 @@
+2001-05-06  Jim Blandy  <jimb@redhat.com>
+
+       * restore.c: Make the code of caller0 correspond to its comment.
+
 2001-05-03  Michael Snyder  <msnyder@redhat.com>
 
        * config/sid.exp (gdb_target_sid): Check for error messages.
index 974e94486cc4414077d3b6bfb6d4bacae38badc6..e05d68c21451c69ada27fdbe3cf71ff1d6b4e55e 100644 (file)
    (defun caller (n) (format "caller%d" n))
    (defun local  (n) (format "l%d"  n))
    (defun local-sum (n)
-     (let ((j 1))
-       (while (<= j n)
-         (insert (local j))
-        (if (< j n) (insert "+"))
-         (setq j (1+ j)))))
+     (if (zerop n) (insert "0")
+       (let ((j 1))
+         (while (<= j n)
+           (insert (local j))
+           (if (< j n) (insert "+"))
+           (setq j (1+ j))))))
    (defun local-chain (n previous first-end)
      (let ((j 1))
        (while (<= j n)
@@ -53,8 +54,7 @@
           (insert "{\n")
           (local-chain i "n" (callee i))
           (insert "  return ")
-          (if (<= i 0) (insert "n")
-            (local-sum i))
+          (local-sum i)
           (insert ";\n")
           (insert "}\n\n")
           (setq i (1+ i))))
@@ -103,7 +103,7 @@ increment (int n)
 int
 callee0 (int n)
 {
-  return n;
+  return 0;
 }
 
 /* Returns n * 1 + 1 */