Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] Diff of /sml/trunk/src/system/abcdef.sml
ViewVC logotype

Diff of /sml/trunk/src/system/abcdef.sml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1668, Wed Oct 27 22:22:13 2004 UTC revision 1669, Wed Oct 27 22:49:25 2004 UTC
# Line 11  Line 11 
11  *)  *)
12          and e (x, 0) = f x          and e (x, 0) = f x
13            | e (x, n) = e (x, n - 1)            | e (x, n) = e (x, n - 1)
14          and f 0 = BackTrace.trigger ()          and f 0 = (* BackTrace.trigger () *) raise Fail "triggered"
15            | f n = n * g (n - 1)            | f n = n * g (n - 1)
16          and g n = a (n, 3)          and g n = a (n, 3)
17      in      in

Legend:
Removed from v.1668  
changed lines
  Added in v.1669

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0