aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/type/abstract.lux
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--stdlib/source/lux/type/abstract.lux6
1 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/lux/type/abstract.lux b/stdlib/source/lux/type/abstract.lux
index 15534b996..c3121d7ff 100644
--- a/stdlib/source/lux/type/abstract.lux
+++ b/stdlib/source/lux/type/abstract.lux
@@ -62,7 +62,7 @@
(undefined)
(#.Right [exported? frame_type frame_anns frame_value])
- (:coerce (Stack Frame) frame_value))))
+ (:as (Stack Frame) frame_value))))
(def: (peek_frames reference definition_reference source)
(-> Text Text (List [Text Module]) (Stack Frame))
@@ -122,7 +122,7 @@
(#.Right [exported?
frames_type
frames_anns
- (..push frame (:coerce (Stack Frame) frames_value))]))))
+ (..push frame (:as (Stack Frame) frames_value))]))))
(def: (push_frame [module_reference definition_reference] frame source)
(-> Name Frame (List [Text Module]) (List [Text Module]))
@@ -148,7 +148,7 @@
(#.Right [exported?
frames_type
frames_anns
- (let [current_frames (:coerce (Stack Frame) frames_value)]
+ (let [current_frames (:as (Stack Frame) frames_value)]
(case (..pop current_frames)
(#.Some current_frames')
current_frames'