aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/data/collection/queue.lux
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--stdlib/source/lux/data/collection/queue.lux8
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/lux/data/collection/queue.lux b/stdlib/source/lux/data/collection/queue.lux
index d05095ead..bbb2c8721 100644
--- a/stdlib/source/lux/data/collection/queue.lux
+++ b/stdlib/source/lux/data/collection/queue.lux
@@ -2,7 +2,7 @@
lux
(lux (control [equivalence (#+ Equivalence)]
["F" functor])
- (data (collection [list "L/" Monoid<List> Functor<List>]))))
+ (data (collection [list ("list/" Monoid<List> Functor<List>)]))))
(type: #export (Queue a)
{#front (List a)
@@ -21,7 +21,7 @@
(def: #export (to-list queue)
(All [a] (-> (Queue a) (List a)))
(let [(^slots [#front #rear]) queue]
- (L/compose front (list.reverse rear))))
+ (list/compose front (list.reverse rear))))
(def: #export peek
(All [a] (-> (Queue a) (Maybe a)))
@@ -74,5 +74,5 @@
(structure: #export _ (F.Functor Queue)
(def: (map f fa)
- {#front (|> fa (get@ #front) (L/map f))
- #rear (|> fa (get@ #rear) (L/map f))}))
+ {#front (|> fa (get@ #front) (list/map f))
+ #rear (|> fa (get@ #rear) (list/map f))}))