Update of /cvsroot/pure-data/externals/hcs In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv21226

Modified Files: version.c version-help.pd TODO Log Message: added compilation date and time to the output list

Index: version.c =================================================================== RCS file: /cvsroot/pure-data/externals/hcs/version.c,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** version.c 19 Sep 2006 16:45:03 -0000 1.1 --- version.c 26 Nov 2006 05:55:44 -0000 1.2 *************** *** 52,62 **** DEBUG(post("version_output"););

! t_atom version_data[4]; 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)); ! outlet_list(x->x_obj.ob_outlet, &s_list, 4, version_data); }

--- 52,64 ---- DEBUG(post("version_output"););

! 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, 6, version_data); }

*************** *** 91,94 **** /* add inlet datatype methods */ class_addbang(version_class,(t_method) version_output); - } --- 93,95 ----

Index: TODO =================================================================== RCS file: /cvsroot/pure-data/externals/hcs/TODO,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** TODO 8 Apr 2006 23:48:38 -0000 1.5 --- TODO 26 Nov 2006 05:55:44 -0000 1.6 *************** *** 1,11 ****

- 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(

--- 1,10 ----

+ - 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 ! - make [file/match] behave like [qlist]

Index: version-help.pd =================================================================== RCS file: /cvsroot/pure-data/externals/hcs/version-help.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** version-help.pd 19 Sep 2006 16:45:03 -0000 1.1 --- version-help.pd 26 Nov 2006 05:55:44 -0000 1.2 *************** *** 1,16 **** ! #N canvas 313 142 454 312 10; #X obj 364 11 import hcs; ! #X msg 90 73 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 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; --- 1,20 ---- ! #N canvas 313 142 458 316 10; #X obj 364 11 import hcs; ! #X msg 49 57 bang; #X text 40 12 Get the version of the currently running Pd.; ! #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 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;