Mercurial Mercurial > hg > nominal2 / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Nominal-General/nominal_library.ML
changeset 2375 e163fd99de44
parent 2313 25d2cdf7d7e4
child 2384 841b7e34e70a 
--- a/Nominal-General/nominal_library.ML	Mon Jul 19 14:20:23 2010 +0100
+++ b/Nominal-General/nominal_library.ML	Mon Jul 19 16:59:43 2010 +0100
@@ -61,7 +61,7 @@
 
 fun last2 [] = raise Empty
   | last2 [_] = raise Empty
-  | last2 [x, y] = (x,y)
+  | last2 [x, y] = (x, y)
   | last2 (_ :: xs) = last2 xs
 
 fun dest_listT (Type (@{type_name list}, [T])) = T
nominal2