diff --git a/Examples/test-suite/chicken/ext_test_external.cxx b/Examples/test-suite/chicken/chicken_ext_test_external.cxx
similarity index 90%
rename from Examples/test-suite/chicken/ext_test_external.cxx
rename to Examples/test-suite/chicken/chicken_ext_test_external.cxx
index 338151e88..1dd6a7d53 100644
--- a/Examples/test-suite/chicken/ext_test_external.cxx
+++ b/Examples/test-suite/chicken/chicken_ext_test_external.cxx
@@ -1,4 +1,4 @@
-#include <ext_test_wrap_hdr.h>
+#include <chicken/chicken_ext_test_wrap_hdr.h>
 #include <imports_a.h>
 
 void test_create(C_word,C_word,C_word) C_noret;
@@ -7,16 +7,15 @@ void test_create(C_word argc, C_word closure, C_word continuation) {
   swig_type_info *type;
   A *newobj;
   C_word *known_space = C_alloc(C_SIZEOF_SWIG_POINTER);
-  
+
   C_trace("test-create");
   if (argc!=2) C_bad_argc(argc,2);
 
 
   newobj = new A();
-  
+
   type = SWIG_TypeQuery("A *");
   resultobj = SWIG_NewPointerObj(newobj, type, 1);
 
   C_kontinue(continuation, resultobj);
 }
-
diff --git a/Examples/test-suite/guilescm/ext_test_external.cxx b/Examples/test-suite/guilescm/guilescm_ext_test_external.cxx
similarity index 90%
rename from Examples/test-suite/guilescm/ext_test_external.cxx
rename to Examples/test-suite/guilescm/guilescm_ext_test_external.cxx
index 713e5d2d0..30fa1ce7b 100644
--- a/Examples/test-suite/guilescm/ext_test_external.cxx
+++ b/Examples/test-suite/guilescm/guilescm_ext_test_external.cxx
@@ -1,4 +1,4 @@
-#include <ext_test_wrap_hdr.h>
+#include <guilescm_ext_test_wrap_hdr.h>
 #include <imports_a.h>
 
 SCM test_create()