added compilation date and time to the output list

svn path=/trunk/externals/hcs/; revision=6431

3 files changed, 27 insertions, 23 deletions

diff --git a/TODO b/TODO
index c0276f0..85e2988 100644
--- a/TODO
+++ b/TODO
@@ -1,12 +1,11 @@
 
+- pddate compare object
+
+- make ISOdate and ISOtime accept pddate format
+
 - rename [folder_list] to [file/match] and make other file lib objects
   - make [file/match] handle lists of patterns
-
-- write [version] object
-  - [bang( outputs list of version major minor bugfix i.e. [0 39 2(
-  - [time( outputs pd_compiletime
-  - [date( outputs pd_compiledate
-  - this should really be handled by messages to Pd, [;pd get date(
+  - make [file/match] behave like [qlist]
 
 
 - [cursor] object
diff --git a/version-help.pd b/version-help.pd
index 255334d..cf41b10 100644
--- a/version-help.pd
+++ b/version-help.pd
@@ -1,16 +1,20 @@
-#N canvas 313 142 454 312 10;
+#N canvas 313 142 458 316 10;
 #X obj 364 11 import hcs;
-#X msg 90 73 bang;
+#X msg 49 57 bang;
 #X text 40 12 Get the version of the currently running Pd.;
-#X obj 90 135 version;
-#X obj 90 160 unpack float float float symbol;
-#X floatatom 90 184 5 0 0 0 - - -;
-#X floatatom 160 184 5 0 0 0 - - -;
-#X floatatom 230 186 5 0 0 0 - - -;
-#X symbolatom 303 185 0 0 0 0 - - -;
+#X obj 49 119 version;
+#X floatatom 49 168 5 0 0 3 major - -;
+#X floatatom 111 168 5 0 0 3 minor - -;
+#X floatatom 173 170 5 0 0 3 bugfix - -;
+#X symbolatom 235 243 0 0 0 3 test - -;
+#X obj 49 144 unpack float float float symbol symbol symbol;
+#X symbolatom 297 203 0 0 0 3 date - -;
+#X symbolatom 359 169 0 0 0 3 time - -;
 #X connect 1 0 3 0;
-#X connect 3 0 4 0;
-#X connect 4 0 5 0;
-#X connect 4 1 6 0;
-#X connect 4 2 7 0;
-#X connect 4 3 8 0;
+#X connect 3 0 8 0;
+#X connect 8 0 4 0;
+#X connect 8 1 5 0;
+#X connect 8 2 6 0;
+#X connect 8 3 7 0;
+#X connect 8 4 9 0;
+#X connect 8 5 10 0;
diff --git a/version.c b/version.c
index 6487c49..fddbf37 100644
--- a/version.c
+++ b/version.c
@@ -27,7 +27,7 @@
 
 #include <m_pd.h>
 
-static char *version = "$Revision: 1.1 $";
+static char *version = "$Revision: 1.2 $";
 
 t_int version_instance_count;
 
@@ -51,13 +51,15 @@ static void version_output(t_version* x)
 {
 	DEBUG(post("version_output"););
 
-	t_atom version_data[4];
+	t_atom version_data[6];
 	SETFLOAT(version_data, (float) PD_MAJOR_VERSION);
 	SETFLOAT(version_data + 1, (float) PD_MINOR_VERSION);
 	SETFLOAT(version_data + 2, (float) PD_BUGFIX_VERSION);
 	SETSYMBOL(version_data + 3, gensym(PD_TEST_VERSION));
+	SETSYMBOL(version_data + 4, gensym(__DATE__));
+	SETSYMBOL(version_data + 5, gensym(__TIME__));
 	
-	outlet_list(x->x_obj.ob_outlet, &s_list, 4, version_data);
+	outlet_list(x->x_obj.ob_outlet, &s_list, 6, version_data);
 }
 
 
@@ -90,5 +92,4 @@ void version_setup(void)
 								  0);
 	/* add inlet datatype methods */
 	class_addbang(version_class,(t_method) version_output);
-	
 }