Remove an unused value

This commit is contained in:
Tristan Ravitch 2017-11-06 10:13:49 -08:00
parent 0ed78396cf
commit e2e3744808

View File

@ -283,9 +283,6 @@ finishWithTerminator term =
return GenResult { resBlockSeq = s0 ^. blockSeq & frontierBlocks %~ (Seq.|> fin_block)
, resState = Nothing
}
where
ptrRep :: NR.NatRepr (RegAddrWidth (PPCReg ppc))
ptrRep = NR.knownNat
-- | Convert the contents of a 'PreBlock' (a block being constructed) into a
-- full-fledged 'Block'