diff --git a/src/write.c b/src/write.c
index e54bba13..504bf59c 100644
--- a/src/write.c
+++ b/src/write.c
@@ -137,7 +137,7 @@ write(pic_state *pic, pic_value obj)
     printf(">");
     break;
   case PIC_TT_LIB:
-    printf("#<library %p>", pic_ptr(obj));
+    printf("#<lib %p>", pic_ptr(obj));
     break;
   case PIC_TT_VAR:
     printf("#<var %p>", pic_ptr(obj));