diff --git a/lang/cem/ctest/ctest1/test.c b/lang/cem/ctest/ctest1/test.c
index 4befc9789..908d1b244 100644
--- a/lang/cem/ctest/ctest1/test.c
+++ b/lang/cem/ctest/ctest1/test.c
@@ -859,7 +859,7 @@ test7()		/* local records */
 #ifndef NOFLOAT
     if ( fabs ( s2.aaa * s1.aaa - s1.c1 * 5 - 1.0 ) > epsf ) e(36);
 #else
-    if ( 5*r1.c1 != 15 ) e(36) ;
+    if ( 5*s1.c1 != 15 ) e(36) ;
 #endif
 }
 
diff --git a/modules/src/object/object.3 b/modules/src/object/object.3
index 2124f8232..b0269d8fd 100644
--- a/modules/src/object/object.3
+++ b/modules/src/object/object.3
@@ -21,7 +21,7 @@ and write ACK-object files and libraries
 .PP
 .B wr_ohead(head)
 .br
-.B struct outsect *head;
+.B struct outhead *head;
 .PP
 .B wr_sect(sect, cnt)
 .br
@@ -93,7 +93,7 @@ and write ACK-object files and libraries
 .PP
 .B rd_ohead(head)
 .br
-.B struct outsect *head;
+.B struct outhead *head;
 .PP
 .B rd_sect(sect, cnt)
 .br