diff --git a/src/engine/builtins.c b/src/engine/builtins.c
index daa73db..debe997 100644
--- a/src/engine/builtins.c
+++ b/src/engine/builtins.c
@@ -1897,6 +1897,7 @@ LIST *builtin_readlink( FRAME * frame, int flags )
             return 0;
         }
         cbuf[numchars] = '\0';
+        printf("THIS IS A SYMLINK = %s from %s\n", cbuf, path);
         return list_new( object_new( cbuf ) );
     }
     else if( okay && buf.reparse.ReparseTag == IO_REPARSE_TAG_MOUNT_POINT )
@@ -1919,6 +1920,7 @@ LIST *builtin_readlink( FRAME * frame, int flags )
         {
             result += 4;
         }
+        printf("THIS IS A HARDLINK = %s from %s\n", result, path);
         return list_new( object_new( result ) );
     }
     return 0;
diff --git a/src/tools/link.jam b/src/tools/link.jam
index 4a7034b..e84b2dc 100644
--- a/src/tools/link.jam
+++ b/src/tools/link.jam
@@ -373,6 +373,8 @@ rule link-recursively ( target : source : no-recurse ? )
                 [ path.root [ path.make $(link-target) ] [ path.parent $(target) ] ] ;
             if $(full-path) != $(source)
             {
+                ECHO merging $(full-path) with $(source) ;
+                ECHO merging-2 [ path.native $(full-path) ] with [ path.native $(source) ] ;
                 do-rm $(target) ;
                 do-split $(target) ;
                 split = true ;
@@ -419,6 +421,8 @@ rule do-link-recursively ( target : source : properties * )
                     [ path.make $(source-path[1]) ] ]
         [ path.pwd ] ] ;
 
+    ECHO target-path: [ path.native $(target-path) ] source-path: [ path.native $(source-path) ] pwd: [ path.pwd ] ;        
+        
     local .current-target = $(target) ;
 
     link-recursively $(absolute-target) : $(absolute-source) ;