gEDA-cvs: gaf.git: branch: master updated (1.7.0-20110116-21-gde856e2)

[git@xxxxxxxxxx]

The branch, master has been updated
       via  de856e25a83158237aaf33f29f024b72944a60fe (commit)
      from  6f30672e88af11776aa1a1fed74d00fab7c492f7 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.


=========
 Summary
=========

 gnetlist/src/gnetlist.c |    6 +++---
 1 files changed, 3 insertions(+), 3 deletions(-)


=================
 Commit Messages
=================

commit de856e25a83158237aaf33f29f024b72944a60fe
Author: Peter TB Brett <peter@xxxxxxxxxxxxx>
Commit: Peter TB Brett <peter@xxxxxxxxxxxxx>

    Fix compilation with Guile 1.9.x.

:100644 100644 f08c112... 79eec78... M	gnetlist/src/gnetlist.c

=========
 Changes
=========

commit de856e25a83158237aaf33f29f024b72944a60fe
Author: Peter TB Brett <peter@xxxxxxxxxxxxx>
Commit: Peter TB Brett <peter@xxxxxxxxxxxxx>

    Fix compilation with Guile 1.9.x.

diff --git a/gnetlist/src/gnetlist.c b/gnetlist/src/gnetlist.c
index f08c112..79eec78 100644
--- a/gnetlist/src/gnetlist.c
+++ b/gnetlist/src/gnetlist.c
@@ -187,7 +187,7 @@ void main_prog(void *closure, int argc, char *argv[])
 
     /* Evaluate Scheme expressions that need to be run before rc files
      * are loaded. */
-    scm_eval_x (pre_rc_list, scm_current_module ());
+    scm_eval (pre_rc_list, scm_current_module ());
 
     g_rc_parse (pr_current, argv[0], "gnetlistrc", rc_filename);
     /* immediately setup user params */
@@ -202,7 +202,7 @@ void main_prog(void *closure, int argc, char *argv[])
 
     /* Evaluate the first set of Scheme expressions before we load any
      * schematic files */
-    scm_eval_x (pre_backend_list, scm_current_module ());
+    scm_eval (pre_backend_list, scm_current_module ());
 
     i = argv_index;
     while (argv[i] != NULL) {
@@ -278,7 +278,7 @@ void main_prog(void *closure, int argc, char *argv[])
       scm_primitive_load (s_backend_path);
 
       /* Evaluate second set of Scheme expressions. */
-      scm_eval_x (post_backend_list, scm_current_module ());
+      scm_eval (post_backend_list, scm_current_module ());
     }
 
     s_traverse_init();




_______________________________________________
geda-cvs mailing list
geda-cvs@xxxxxxxxxxxxxx
http://www.seul.org/cgi-bin/mailman/listinfo/geda-cvs