Mercurial > repos > rhope

diff kernel.rhope @ 78:4d5ea487f810

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Working String implementation and some basic (but nowhere near exhaustive) tests
author Mike Pavone <pavone@retrodev.com>
date Thu, 08 Jul 2010 21:55:47 -0400
parents 0083b2f7b3c7
children 80d8c9248f85
line wrap: on
line diff
--- a/kernel.rhope	Thu Jul 08 09:57:16 2010 -0400
+++ b/kernel.rhope	Thu Jul 08 21:55:47 2010 -0400
@@ -374,5 +374,23 @@
 	}
 }
 
+Min[a,b:out]
+{
+	If[[a]<[b]]
+	{
+		out <- a
+	}{
+		out <- b
+	}
+}
 
+Max[a,b:out]
+{
+	If[[a]>[b]]
+	{
+		out <- a
+	}{
+		out <- b
+	}
+}