14 lines
243 B
Haskell
14 lines
243 B
Haskell
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
|
|
module Gen(
|
|
toLit
|
|
)
|
|
where
|
|
|
|
import Language.Rust.Data.Position
|
|
import Language.Rust.Syntax
|
|
|
|
toLit :: Word -> Expr Span
|
|
toLit i = Lit [] (Int Dec (fromIntegral i) Unsuffixed mempty) mempty
|
|
|
|
|