stack-checker.*: infer doesn't need to be generic

basis/stack-checker/backend/backend.factor

@@ -157,9 +157,6 @@ M: object apply-object push-literal ;
         stack-visitor get
     ] with-scope ; inline
 
-: (infer) ( quot -- effect )
-    [ infer-quot-here ] with-infer drop ;
-
 : ?quotation-effect ( in -- effect/f )
     dup pair? [ second dup effect? [ drop f ] unless ] [ drop f ] if ;
 

basis/stack-checker/stack-checker.factor

@@ -8,10 +8,8 @@ stack-checker.errors stack-checker.inlining
 stack-checker.visitor.dummy ;
 IN: stack-checker
 
-GENERIC: infer ( quot -- effect )
-
-M: callable infer ( quot -- effect )
-    (infer) ;
+: infer ( quot -- effect )
+    [ infer-quot-here ] with-infer drop ;
 
 : infer. ( quot -- )
     ! Safe to call from inference transforms.