Small error and sl-store-head added.

2026-08-03 13:26:36 +02:00
parent 58da0a3d79
commit f88ee4951e
3 changed files with 30 additions and 2 deletions
@@ -288,6 +288,15 @@ Returns a store containing the last @racket[count] entries. If
@racket[count] is greater than the store length, all entries are returned.
 }

+
+@defproc[(sl-store-head [store any/c]
+                        [count exact-nonnegative-integer?])
+         any/c]{
+
+Returns a store containing the first @racket[count] entries. If
+@racket[count] is greater than the store length, all entries are returned.
+}
+
@section{Store examples}

@racketblock[