diff options
author | Roman Smrž <roman.smrz@seznam.cz> | 2025-04-20 22:58:31 +0200 |
---|---|---|
committer | Roman Smrž <roman.smrz@seznam.cz> | 2025-04-22 19:39:47 +0200 |
commit | 47ec9619f90af3264b11ad26654610a043ed0d8d (patch) | |
tree | 97f1f629ec11b06ceba3825dd8895292c9ea538d /src/Asset.hs | |
parent | 57671619f81dbdcafa1fce4f91956bc647a57588 (diff) |
Conversions for variable expansion in ExprType class
Diffstat (limited to 'src/Asset.hs')
-rw-r--r-- | src/Asset.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/Asset.hs b/src/Asset.hs index 550438b..72ffd54 100644 --- a/src/Asset.hs +++ b/src/Asset.hs @@ -5,6 +5,7 @@ module Asset ( import Data.Text (Text) import Data.Text qualified as T +import Data.Typeable import Script.Expr.Class @@ -28,3 +29,5 @@ instance ExprType Asset where instance ExprType AssetPath where textExprType _ = "filepath" textExprValue = ("filepath:" <>) . textAssetPath + + exprExpansionConvTo = cast textAssetPath |