Skip to content

Commit

Permalink
remove unnecessary constraint
Browse files Browse the repository at this point in the history
  • Loading branch information
stylewarning committed Oct 12, 2023
1 parent 50c841f commit 10019d3
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion library/vector.lisp
Original file line number Diff line number Diff line change
Expand Up @@ -66,7 +66,7 @@
(lisp (Vector :a) (n)
(cl:make-array n :fill-pointer 0 :adjustable cl:t :element-type cl:t)))

(declare with-initial-element (types:RuntimeRepr :a => UFix -> :a -> Vector :a))
(declare with-initial-element (UFix -> :a -> Vector :a))
(define (with-initial-element n x)
"Create a new vector with `n` elements equal to `x`."
(let v = (with-capacity n))
Expand Down

0 comments on commit 10019d3

Please sign in to comment.