diff --git a/src/hungarian/ResHun.gf b/src/hungarian/ResHun.gf
index d9790d57d..f610740f4 100644
--- a/src/hungarian/ResHun.gf
+++ b/src/hungarian/ResHun.gf
@@ -231,9 +231,9 @@ oper
                                            SCDat => Dat }
                     in np.s ! subjcase
                     ++ np.empty -- standard trick for prodrop
+                    ++ vp.s ! agr2vf np.agr
                     ++ vp.obj
                     ++ vp.adv
-                    ++ vp.s ! agr2vf np.agr
     } ;
 
 --------------------------------------------------------------------------------