diff options
| -rw-r--r-- | TODO | 11 | ||||
| -rw-r--r-- | version-help.pd | 30 | ||||
| -rw-r--r-- | version.c | 9 |
3 files changed, 27 insertions, 23 deletions
@@ -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; @@ -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); - } |