diff --git a/libguile/print.c b/libguile/print.c
index f0cddb892..98ec9cb83 100644
--- a/libguile/print.c
+++ b/libguile/print.c
@@ -97,7 +97,19 @@ char *scm_isymnames[] =
   "()",
   "#<unspecified>",
   "#@dispatch",
-  "#@hash-dispatch"
+  "#@hash-dispatch",
+
+#ifdef GUILE_LANG
+  /* Multi-language support */
+  
+  "#@nil-cond",
+  "#@nil-ify",
+  "#@t-ify",
+  "#@0-cond",
+  "#@0-ify",
+  "#@1-ify",
+  "#@bind"
+#endif /* GUILE_LANG */
 };
 
 scm_option scm_print_opts[] = {
diff --git a/libguile/tags.h b/libguile/tags.h
index e19d5ec48..3b4c71aab 100644
--- a/libguile/tags.h
+++ b/libguile/tags.h
@@ -472,6 +472,18 @@ enum scm_tags
 #define SCM_IM_DISPATCH		SCM_MAKISYM(22)
 #define SCM_IM_HASH_DISPATCH	SCM_MAKISYM(23)
 
+#ifdef GUILE_LANG
+/* Multi-language support */
+
+#define SCM_IM_NIL_COND		SCM_MAKISYM(24)
+#define SCM_IM_NIL_IFY		SCM_MAKISYM(25)
+#define SCM_IM_T_IFY		SCM_MAKISYM(26)
+#define SCM_IM_0_COND		SCM_MAKISYM(27)
+#define SCM_IM_0_IFY		SCM_MAKISYM(28)
+#define SCM_IM_1_IFY		SCM_MAKISYM(29)
+#define SCM_IM_BIND		SCM_MAKISYM(30)
+#endif
+
 
 #define SCM_UNBNDP(x) 	(SCM_UNDEFINED==(x))