(defun foo (x)
  (bar (baz x)))

(defun bar (x) x)

(defun baz (x) x)

................

(defun foo (x)
  (baz x)
  (bar x))

................

> (foo1 3)
----Enter FOO1
|     X = 3
|   ----Enter BAZ
|   |     X = 3
|    \--BAZ returned 3
|   ----Enter BAR
|   |     X = 3
|    \--BAR returned 3
 \--FOO1 returned 3
3

> (foo2 3)
----Enter FOO2
|     X = 3
|   ----Enter BAZ
|   |     X = 3
|    \--BAZ returned 3
|   ----Enter BAR
|   |     X = 3
|    \--BAR returned 3
 \--FOO2 returned 3
3

> (duntrace)
(FOO1 FOO2 BAR BAZ)

> (trace foo1 foo2 bar baz)
FOO1

> (foo1 3)
 0: (FOO1 3)
   1: (BAZ 3)
   1: returned 3
   1: (BAR 3)
   1: returned 3
 0: returned 3
3

> (foo2 3)
 0: (FOO2 3)
   1: (BAZ 3)
   1: returned 3
   1: (BAR 3)
   1: returned 3
 0: returned 3
3
> 
