Add type annotations for port line counting (#479)

This commit is contained in:
WarGrey Gyoudmon Ju 2017-01-05 03:47:44 +08:00 committed by Sam Tobin-Hochstadt
parent fdb79d9a34
commit 5b546e1b2c

View File

@ -1810,7 +1810,9 @@
;; Section 13.1.4
[port-count-lines! (-> (Un -Input-Port -Output-Port) -Void)]
[port-counts-lines? (-> (Un -Input-Port -Output-Port) -Boolean)]
[port-next-location (-> (Un -Input-Port -Output-Port) (-values (list (-opt -PosInt) (-opt -Nat) (-opt -PosInt))))]
[set-port-next-location! (-> (Un -Input-Port -Output-Port) (-opt -PosInt) (-opt -Nat) (-opt -PosInt) -Void)]
[port-count-lines-enabled (-Param Univ B)]
;; Section 13.1.5