anchor.diff:                                 complexSelectorWithFinalArgs:24
                                                (int)1 (float)2.0]")
               (read-message-send stream 'self (function read-message)))
  -          '(self "multipleArg:complexSelectorWithFinalArgs:" (42 24) ((:int 1) (:float 2.0))))))
  +          '(self "multipleArg:complexSelectorWithFinalArgs:" (42 24) ((:int 1) (:float 2.0d0))))))
   
   
   (define-test test/message-send ()
  
positive.code:            '(oclo:send self
               :multiple-arg 42
               :complex-selector-with-final-args 24
               (:int 1 :float 2.0)))
       (test equal
             (read-objc "(progn [self simpleSelector]
                               [self multipleArg:42 complexSelector:24])")
  
negative.code:          (with-string-check (*objc-readtable*
                               stream "(integer)(+ 1 2) (float)(+ 1.0 2.0)]")
             (read-final-arguments stream))
           '((:integer (+ 1 2)) (:float (+ 1.0d0 2.0d0))))
     (test eql
           (handler-case
               (progn
  