apply < doesn't accept a non-empty list

[sorawee]

What version of Racket are you using?

8.11 [cs]

What program did you run?

#lang typed/racket

(: xs (Pairof Real (Listof Real)))
(define xs (list 1))
(apply < xs)

(This is the same issue as #1298, but with apply involved)

What should have happened?

It should type check.

If you got an error message, please include it here.

Type Checker: Bad arguments to function in `apply':
Domains: Real Real Real *
         Real 
Arguments:  (Pairof Real (Listof Real))
 in: (apply < xs)