export getEvalPosition

RyanGlScott · Dec 19, 2022 · b4657f0 · b4657f0
1 parent 2005df7
commit b4657f0
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/src/Libraries/Base1/Prelude.bs b/src/Libraries/Base1/Prelude.bs
@@ -53,7 +53,7 @@ package Prelude(
         StringProxy,
         _when_,
         primExtract,
-        Position__, getStringPosition, setStringPosition, printPosition, noPosition,
+        Position__, getStringPosition, setStringPosition, printPosition, noPosition, getEvalPosition,
         Type, typeOf, printType, isInterfaceType,
         forceIsModule,
         Name__, primGetName, primMakeName, primJoinNames, primExtendNameIndex,
@@ -2442,6 +2442,9 @@ primitive primGetNameString :: Name__ -> String
 
 primitive primGetEvalPosition :: a -> Position__
 
+getEvalPosition :: a -> Position__
+getEvalPosition = primGetEvalPosition
+
 -- type primitives
 
 primitive type Type :: *