From 4d6b350509ee84a9bd457c2eb0fa4d599f810bf5 Mon Sep 17 00:00:00 2001
From: Krzysztof Wilczynski <krzysztof.wilczynski@linux.com>
Date: Tue, 26 Apr 2011 00:14:24 +0100
Subject: First version.  Simple reverse function to use within Puppet DSL.

Signed-off-by: Krzysztof Wilczynski <krzysztof.wilczynski@linux.com>
---
 reverse.rb | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)
 create mode 100644 reverse.rb

diff --git a/reverse.rb b/reverse.rb
new file mode 100644
index 0000000..49ea80a
--- /dev/null
+++ b/reverse.rb
@@ -0,0 +1,25 @@
+#
+# reverse.rb
+#
+
+module Puppet::Parser::Functions
+  newfunction(:reverse, :type => :rvalue, :doc => <<-EOS
+    EOS
+  ) do |arguments|
+
+    raise(Puppet::ParseError, "reverse(): Wrong number of arguments " +
+      "given (#{arguments.size} for 1)") if arguments.size < 1
+
+    array = arguments[0]
+
+    if not array.is_a?(Array)
+      raise(Puppet::ParseError, 'reverse(): Requires an array to work with')
+    end
+
+    result = array.reverse
+
+    return result
+  end
+end
+
+# vim: set ts=2 sw=2 et :
-- 
cgit v1.2.3