git.iko.soy/elk
on master help sign in
Remove unused Parse.Primitives.getContext parser
51e95e8Evan Czaplicki
src/Parse/Primitives.hs+1−7
compare with master
unifiedsplit
@@ -6,7 +6,7 @@ module Parse.Primitives
6 , run, runAt
6 , run, runAt
7 , try, deadend, hint, endOfFile
7 , try, deadend, hint, endOfFile
8 , getPosition, getCol
8 , getPosition, getCol
9− , getContext, pushContext, popContext
9+ , pushContext, popContext
10 , getIndent, setIndent
10 , getIndent, setIndent
11 , W.SPos
11 , W.SPos
12 , SParser
12 , SParser
@@ -138,12 +138,6 @@ getCol =
138 eok col state noError
138 eok col state noError
139
139
140
140
141−getContext :: Parser E.ContextStack
142−getContext =
143− Parser $ \state@(State _ _ _ _ _ _ ctx) _ _ eok _ ->
144− eok ctx state noError
145−
146−
147pushContext :: R.Position -> E.Context -> Parser ()
141pushContext :: R.Position -> E.Context -> Parser ()
148pushContext pos ctx =
142pushContext pos ctx =
149 Parser $ \state@(State _ _ _ _ _ _ context) _ _ eok _ ->
143 Parser $ \state@(State _ _ _ _ _ _ context) _ _ eok _ ->