diff --git a/collects/lang/private/advanced-funs.rkt b/collects/lang/private/advanced-funs.rkt index 49c76c5c51..e283d90469 100644 --- a/collects/lang/private/advanced-funs.rkt +++ b/collects/lang/private/advanced-funs.rkt @@ -79,8 +79,8 @@ (void? (any -> boolean) "Determines if a value is void.")) ("Posns" - (set-posn-x! (posn number -> void) "Updates the x component of a posn.") - (set-posn-y! (posn number -> void) "Updates the x component of a posn.")) + (set-posn-x! (posn any -> void) "Updates the x component of a posn.") + (set-posn-y! (posn any -> void) "Updates the y component of a posn.")) ("Vectors" (vector (X ... -> (vector X ...)) "Constructs a vector.") diff --git a/collects/lang/private/beginner-funs.rkt b/collects/lang/private/beginner-funs.rkt index f5570e0cfa..122db15218 100644 --- a/collects/lang/private/beginner-funs.rkt +++ b/collects/lang/private/beginner-funs.rkt @@ -315,10 +315,10 @@ ("Posns" (posn signature "Signature for posns.") - (make-posn (number number -> posn) "Constructs a posn.") - (posn? (anything -> boolean) "Determines if its input is a posn.") - (posn-x (posn -> number) "Extracts the x component of a posn.") - (posn-y (posn -> number) "Extracts the y component of a posn.")) + (make-posn (any any -> posn) "Constructs a posn from two arbitrary values.") + (posn? (any -> boolean) "Determines if its input is a posn.") + (posn-x (posn -> any) "Extracts the x component of a posn.") + (posn-y (posn -> any) "Extracts the y component of a posn.")) ("Characters" (char? (any -> boolean)