+(uffi:def-function ("return_long_negative_one" return-long-negative-one)
+ ()
+ :returning :long)
+
+(uffi:def-function ("return_int_negative_one" return-int-negative-one)
+ ()
+ :returning :int)
+
+(uffi:def-function ("return_short_negative_one" return-short-negative-one)
+ ()
+ :returning :short)
+