1 files changed, 25 insertions, 0 deletions
diff --git a/source4/build/smb_build/dump.pm b/source4/build/smb_build/dump.pm
new file mode 100644
index 0000000000..9a751e3563
--- /dev/null
+++ b/source4/build/smb_build/dump.pm
@@ -0,0 +1,25 @@
+###########################################################
+### SMB Build System					###
+### - the dump & debug functions 			###
+###							###
+###  Copyright (C) Stefan (metze) Metzmacher 2004	###
+###  Released under the GNU GPL				###
+###########################################################
+
+package dump;
+use strict;
+
+use Data::Dumper;
+
+sub dump_ctx($)
+{
+	my $ctx = shift;
+
+	open (DUMP,"> config.smb_build.dump");
+	
+	print DUMP Dumper($ctx);
+
+	close(DUMP);
+}
+
+1;