Commits

Doug Burke  committed a3a7fa7

removed commented-out code from changeset @58f7354a4ea3

  • Participants
  • Parent commits 58f7354
  • Tags 0.3.0.3

Comments (0)

Files changed (1)

File Swish/RDF/N3Parser.hs

   updateState $ updateGraph $ setFormula (Formula bNode (graphState oldState))
   return bNode
   
-{-
-  fstate' <- getState
-  let nstate = pstate { nodeGen = nodeGen fstate' }
-  setState nstate
-  updateState $ updateGraph $ setFormula (Formula bNode (graphState fstate'))
-  return bNode
--}
-  
 subgraph :: RDFLabel -> N3Parser RDFGraph
 subgraph this = do
   pstate <- getState
   oldState <- restoreState pstate  
   return $ graphState oldState
   
-{-  
-  fstate' <- getState
-  let nstate = pstate { nodeGen = nodeGen fstate' }
-  setState nstate       -- swap back state, with updated nodeGen
-  return (graphState fstate')
--}
-
 statementList :: N3Parser ()
 statementList = ignore $ sepEndBy (lexeme statement) fullStop