ilyakooo0/Idris-dev
1
0
Fork 0
mirror of https://github.com/ilyakooo0/Idris-dev.git synced 2024-11-15 01:25:05 +03:00
Code Issues Projects Releases Wiki Activity

Move ElabTerm into Elab.Term

Browse Source
This commit is contained in:
Edwin Brady 2015-04-12 12:45:42 +01:00
parent 8ab281431a
commit c380421706
17 changed files with 18 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
idris.cabal
View File

@ -730,6 +730,7 @@ Library
, Idris.Elab.Provider
, Idris.Elab.Transform
, Idris.Elab.Value
, Idris.Elab.Term
, Idris.AbsSyntax
, Idris.AbsSyntaxTree
@ -748,7 +749,6 @@ Library
, Idris.Docstrings
, Idris.ElabDecls
, Idris.ElabQuasiquote
, Idris.ElabTerm
, Idris.Erasure
, Idris.Error
, Idris.ErrReverse

2
src/Idris/CaseSplit.hs
View File

@ -10,13 +10,13 @@ module Idris.CaseSplit(splitOnLine, replaceSplits,
import Idris.AbsSyntax
import Idris.AbsSyntaxTree (Idris, IState, PTerm)
import Idris.ElabDecls
import Idris.ElabTerm
import Idris.Delaborate
import Idris.Parser
import Idris.Error
import Idris.Output
import Idris.Elab.Value
import Idris.Elab.Term
import Idris.Core.TT
import Idris.Core.Typecheck

2
src/Idris/Elab/Class.hs
View File

@ -7,7 +7,7 @@ import Idris.DSL
import Idris.Error
import Idris.Delaborate
import Idris.Imports
import Idris.ElabTerm
import Idris.Elab.Term
import Idris.Coverage
import Idris.DataOpts
import Idris.Providers

2
src/Idris/Elab/Clause.hs
View File

@ -7,7 +7,7 @@ import Idris.DSL
import Idris.Error
import Idris.Delaborate
import Idris.Imports
import Idris.ElabTerm
import Idris.Elab.Term
import Idris.Coverage
import Idris.DataOpts
import Idris.Providers

2
src/Idris/Elab/Data.hs
View File

@ -7,7 +7,7 @@ import Idris.DSL
import Idris.Error
import Idris.Delaborate
import Idris.Imports
import Idris.ElabTerm
import Idris.Elab.Term
import Idris.Coverage
import Idris.DataOpts
import Idris.Providers

2
src/Idris/Elab/Instance.hs
View File

@ -7,7 +7,6 @@ import Idris.DSL
import Idris.Error
import Idris.Delaborate
import Idris.Imports
import Idris.ElabTerm
import Idris.Coverage
import Idris.DataOpts
import Idris.Providers
@ -21,6 +20,7 @@ import IRTS.Lang
import Idris.Elab.Type
import Idris.Elab.Data
import Idris.Elab.Utils
import Idris.Elab.Term
import Idris.Core.TT
import Idris.Core.Elaborate hiding (Tactic(..))

2
src/Idris/Elab/Provider.hs
View File

@ -7,7 +7,6 @@ import Idris.DSL
import Idris.Error
import Idris.Delaborate
import Idris.Imports
import Idris.ElabTerm
import Idris.Coverage
import Idris.DataOpts
import Idris.Providers
@ -22,6 +21,7 @@ import Idris.Elab.Type
import Idris.Elab.Clause
import Idris.Elab.Value
import Idris.Elab.Utils
import Idris.Elab.Term
import Idris.Core.TT
import Idris.Core.Elaborate hiding (Tactic(..))

2
src/Idris/Elab/Record.hs
View File

@ -7,7 +7,7 @@ import Idris.DSL
import Idris.Error
import Idris.Delaborate
import Idris.Imports
import Idris.ElabTerm
import Idris.Elab.Term
import Idris.Coverage
import Idris.DataOpts
import Idris.Providers

4
src/Idris/ElabTerm.hs → src/Idris/Elab/Term.hs
View File

@ -1,6 +1,6 @@
{-# LANGUAGE PatternGuards, ViewPatterns #-}
{-# OPTIONS_GHC -fwarn-incomplete-patterns #-}
module Idris.ElabTerm where
module Idris.Elab.Term where
import Idris.AbsSyntax
import Idris.AbsSyntaxTree
@ -263,8 +263,6 @@ elab ist info emode opts fn tm
-- typically
elabE :: ElabCtxt -> Maybe FC -> PTerm -> ElabD ()
elabE ina fc' t =
--do g <- goal
--trace ("Elaborating " ++ show t ++ " : " ++ show g) $
do solved <- get_recents
as <- get_autos
-- If any of the autos use variables which have recently been solved,

2
src/Idris/Elab/Transform.hs
View File

@ -7,7 +7,6 @@ import Idris.DSL
import Idris.Error
import Idris.Delaborate
import Idris.Imports
import Idris.ElabTerm
import Idris.Coverage
import Idris.DataOpts
import Idris.Providers
@ -19,6 +18,7 @@ import Idris.Output (iputStrLn, pshow, iWarn)
import IRTS.Lang
import Idris.Elab.Utils
import Idris.Elab.Term
import Idris.Core.TT
import Idris.Core.Elaborate hiding (Tactic(..))

2
src/Idris/Elab/Type.hs
View File

@ -8,7 +8,7 @@ import Idris.DSL
import Idris.Error
import Idris.Delaborate
import Idris.Imports
import Idris.ElabTerm
import Idris.Elab.Term
import Idris.Coverage
import Idris.DataOpts
import Idris.Providers

2
src/Idris/Elab/Value.hs
View File

@ -8,7 +8,6 @@ import Idris.DSL
import Idris.Error
import Idris.Delaborate
import Idris.Imports
import Idris.ElabTerm
import Idris.Coverage
import Idris.DataOpts
import Idris.Providers
@ -20,6 +19,7 @@ import Idris.Output (iputStrLn, pshow, iWarn)
import IRTS.Lang
import Idris.Elab.Utils
import Idris.Elab.Term
import Idris.Core.TT
import Idris.Core.Elaborate hiding (Tactic(..))

2
src/Idris/ElabDecls.hs
View File

@ -9,7 +9,7 @@ import Idris.DSL
import Idris.Error
import Idris.Delaborate
import Idris.Imports
import Idris.ElabTerm
import Idris.Elab.Term
import Idris.Coverage
import Idris.DataOpts
import Idris.Providers

2
src/Idris/Interactive.hs
View File

@ -12,12 +12,12 @@ import Idris.Core.Evaluate
import Idris.CaseSplit
import Idris.AbsSyntax
import Idris.ElabDecls
import Idris.ElabTerm
import Idris.Error
import Idris.Delaborate
import Idris.Output
import Idris.IdeMode hiding (IdeModeCommand(..))
import Idris.Elab.Value
import Idris.Elab.Term
import Util.Pretty
import Util.System

2
src/Idris/Parser.hs
View File

@ -25,8 +25,8 @@ import Idris.Imports
import Idris.Delaborate
import Idris.Error
import Idris.Elab.Value
import Idris.Elab.Term
import Idris.ElabDecls
import Idris.ElabTerm
import Idris.Coverage
import Idris.IBC
import Idris.Unlit

2
src/Idris/Prover.hs
View File

@ -9,13 +9,13 @@ import Idris.Core.Typecheck
import Idris.Elab.Utils
import Idris.Elab.Value
import Idris.Elab.Term
import Idris.AbsSyntax
import Idris.AbsSyntaxTree
import Idris.Delaborate
import Idris.Docs (getDocs, pprintDocs, pprintConstDocs)
import Idris.ElabDecls
import Idris.ElabTerm
import Idris.Parser hiding (params)
import Idris.Error
import Idris.DataOpts

2
src/Idris/REPL.hs
View File

@ -8,7 +8,6 @@ import Idris.ASTUtils
import Idris.Apropos (apropos, aproposModules)
import Idris.REPLParser
import Idris.ElabDecls
import Idris.ElabTerm
import Idris.Erasure
import Idris.Error
import Idris.ErrReverse
@ -39,6 +38,7 @@ import Idris.Elab.Type
import Idris.Elab.Clause
import Idris.Elab.Data
import Idris.Elab.Value
import Idris.Elab.Term
import Version_idris (gitHash)
import Util.System