Argument count mismatch not noticed in recursive method calls

[3b]

;; same with or without (defgeneric foo (a b))
(defmethod foo (a b)
  (foo a))

compiles with no style warnings, expected something like

;
; caught WARNING:
; The function FOO is called with one argument, but wants exactly two.
;

as printed by (defun foo (a b) (declare (ignore b)) (foo a))

tested on
1.5.6.100-93f931e x8664 linux and
2.1.0.51.master.4-0d3e4570b x8664 windows