diff --git a/src/procedure2/GcPrimitives.cpp b/src/procedure2/GcPrimitives.cpp
index a6a4fdb..63a3d3a 100644
--- a/src/procedure2/GcPrimitives.cpp
+++ b/src/procedure2/GcPrimitives.cpp
@@ -12,7 +12,7 @@
 #include <xo/alloc2/generation.hpp>
 
 namespace xo {
-    using xo::mm::generation;
+    using xo::mm::Generation;
 
     namespace scm {
 
@@ -25,7 +25,7 @@ namespace xo {
             bool have_gc = false;
 
             if (rcx.collector()) {
-                generation upto(obj<AGCObject,DInteger>::from(upto_gco));
+                Generation upto(obj<AGCObject,DInteger>::from(upto_gco));
 
                 rcx.collector().request_gc(upto);