add support for default FAUST file

CICM · Aug 23, 2018 · 43e97ed · 43e97ed
1 parent af14690
commit 43e97ed
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 5 deletions.
diff --git a/external/.default.dsp b/external/.default.dsp
@@ -0,0 +1,3 @@
+import("stdfaust.lib");
+
+process = _;
diff --git a/src/faustgen_tilde.c b/src/faustgen_tilde.c
@@ -470,6 +470,8 @@ static void *faustgen_tilde_new(t_symbol* s, int argc, t_atom* argv)
     t_faustgen_tilde* x = (t_faustgen_tilde *)pd_new(faustgen_tilde_class);
     if(x)
     {
+        char default_file[MAXPDSTRING];
+        sprintf(default_file, "%s/.default", class_gethelpdir(faustgen_tilde_class));
         x->f_dsp_factory    = NULL;
         x->f_dsp_instance   = NULL;
 
@@ -481,13 +483,9 @@ static void *faustgen_tilde_new(t_symbol* s, int argc, t_atom* argv)
         x->f_ui_manager     = faust_ui_manager_new((t_object *)x);
         x->f_io_manager     = faust_io_manager_new((t_object *)x, canvas_getcurrent());
         x->f_opt_manager    = faust_opt_manager_new((t_object *)x, canvas_getcurrent());
-        x->f_dsp_name       = atom_getsymbolarg(0, argc, argv);
+        x->f_dsp_name       = argc ? atom_getsymbolarg(0, argc, argv) : gensym(default_file);
         x->f_clock          = clock_new(x, (t_method)faustgen_tilde_autocompile_tick);
         faust_opt_manager_parse_compile_options(x->f_opt_manager, argc ? argc-1 : 0, argv ? argv+1 : NULL);
-        if(!argc)
-        {
-            return x;
-        }
         faustgen_tilde_compile(x);
         if(!x->f_dsp_instance)
         {