Posted to tcl by kbk at Thu Jan 09 20:59:19 GMT 2014view raw

  1. PRODUCERS INSTRUCTIONS CONSUMERS
  2. 0: *ENTRY
  3. 1: x := *PARAMETER 0 x 9 x 10
  4. 2: n := *PARAMETER 1 n 17
  5. 3: j := 0 j 11
  6. 4: s := 1.0 s 15 s 19
  7. 5: t := 1.0 t 8
  8. 6: i := 0 i 16
  9. 7: *GOTO _entry
  10. t 5 t 14 8: _loop: a := - t a 9
  11. a 8 x 1 9: a := a * x a 10
  12. a 9 x 1 10: a := a * x a 12
  13. j 3 j 13 11: j := j + 1 j 12 j 13
  14. a 10 j 11 12: a := a / j a 14
  15. j 11 13: j := j + 1 j 11 j 14
  16. a 12 j 13 14: t := a / j t 8 t 15
  17. s 4 s 15 t 14 15: s := s + t s 15 s 19
  18. i 6 i 16 16: _entry: i := i + 1 i 16 i 17
  19. i 16 n 2 17: a := i < n a 18
  20. a 17 18: *IF a *GOTO _loop
  21. s 4 s 15 19: *RETURN s
  22.