diff --git a/lang/pc/comp/code.c b/lang/pc/comp/code.c
index 5f878475..c9e896fd 100644
--- a/lang/pc/comp/code.c
+++ b/lang/pc/comp/code.c
@@ -257,7 +257,7 @@ CodeEndBlock(df, StackAdjustment)
 			}
 			if( tp->tp_size == word_size )
 				C_lol(-tp->tp_size);
-			if( tp->tp_size == 2 * word_size )
+			else if( tp->tp_size == 2 * word_size )
 				C_ldl(-tp->tp_size);
 			else {
 				C_lal(-tp->tp_size);
diff --git a/lang/pc/comp/tokenname.c b/lang/pc/comp/tokenname.c
index 4c9d6baa..3f1e3fa4 100644
--- a/lang/pc/comp/tokenname.c
+++ b/lang/pc/comp/tokenname.c
@@ -11,6 +11,7 @@
 	Also, the "symbol2str.c" file is produced from this file.
 */
 
+#ifdef ____
 struct tokenname tkspec[] =	{	/* the names of the special tokens */
 	{IDENT, "identifier"},
 	{STRING, "string"},
@@ -27,6 +28,7 @@ struct tokenname tkcomp[] =	{	/* names of the composite tokens */
 	{BECOMES, ":="},
 	{0, ""}
 };
+#endif /* ____ */
 
 struct tokenname tkidf[] =	{	/* names of the identifier tokens */
 	{AND, "and"},