Skip to content

Commit

Permalink
Remove the case that builds a rewrite rule directly from a term
Browse files Browse the repository at this point in the history
in saw-remote-api
  • Loading branch information
robdockins committed Jun 2, 2021
1 parent a267fc9 commit bf68aac
Showing 1 changed file with 0 additions and 1 deletion.
1 change: 0 additions & 1 deletion saw-remote-api/src/SAWServer/ProofScript.hs
Original file line number Diff line number Diff line change
Expand Up @@ -154,7 +154,6 @@ makeSimpset params = do
v <- getServerVal n
case v of
VSimpset ss' -> return (merge ss ss')
VTerm t -> return (addSimp (ttTerm t) Nothing ss) -- TODO! making rewrite rules from terms!
_ -> Argo.raise (notASimpset n)
ss <- foldM add emptySimpset (ssElements params)
setServerVal (ssResult params) ss
Expand Down

0 comments on commit bf68aac

Please sign in to comment.