mirror of
https://github.com/GaloisInc/cryptol.git
synced 2024-09-11 14:06:13 +03:00
Fix slightly incorrect documentation
This commit is contained in:
parent
a05b4eda7f
commit
69e7689527
@ -228,7 +228,7 @@ shiftSeqByInteger :: Backend sym =>
|
||||
SEval sym a {- ^ zero value -} ->
|
||||
Nat' {- ^ size of the sequence -} ->
|
||||
SeqMap sym a {- ^ sequence to shift -} ->
|
||||
SInteger sym {- ^ shift amount, assumed to be in range [0,len) -} ->
|
||||
SInteger sym {- ^ shift amount, assumed to be in range [0,len] -} ->
|
||||
SEval sym (SeqMap sym a)
|
||||
shiftSeqByInteger sym merge reindex zro m xs idx
|
||||
| Just j <- integerAsLit sym idx = shiftOp xs j
|
||||
|
@ -514,7 +514,7 @@ shiftWordByInteger ::
|
||||
(Integer -> Integer -> Maybe Integer)
|
||||
{- ^ reindexing operation -} ->
|
||||
WordValue sym {- ^ word value to shift -} ->
|
||||
SInteger sym {- ^ shift amount, assumed to be in range [0,len) -} ->
|
||||
SInteger sym {- ^ shift amount, assumed to be in range [0,len] -} ->
|
||||
SEval sym (WordValue sym)
|
||||
|
||||
shiftWordByInteger sym wop reindex x idx =
|
||||
|
Loading…
Reference in New Issue
Block a user