Added a loadbang to tof/argument

svn path=/trunk/externals/tof/; revision=12491

1 files changed, 12 insertions, 0 deletions

diff --git a/src/argument.c b/src/argument.c
index 0c7df4b..a0925ba 100644
--- a/src/argument.c
+++ b/src/argument.c
@@ -21,6 +21,8 @@
 
 #include "tof.h"
 
+extern int sys_noloadbang;
+
 t_class *argument_class;
 
 typedef struct argument
@@ -47,6 +49,13 @@ static void argument_bang(t_argument *x)
 }
 
 
+
+static void argument_loadbang(t_argument *x)
+{
+    if (!sys_noloadbang)
+        argument_bang(x);
+}
+
 static void argument_free(t_argument *x) {
 	
 	//freebytes(x->x_a, sizeof(t_atom));
@@ -115,5 +124,8 @@ void argument_setup(void)
         sizeof(t_argument), CLASS_DEFAULT, A_GIMME,0);
     class_addbang(argument_class, argument_bang);
    
+   
+   class_addmethod(argument_class, (t_method)argument_loadbang, gensym("loadbang"), 0);
+   
 }