diff options
Diffstat (limited to 'aarch64/full/spec.sail')
| -rw-r--r-- | aarch64/full/spec.sail | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/aarch64/full/spec.sail b/aarch64/full/spec.sail index f468302b..6920db48 100644 --- a/aarch64/full/spec.sail +++ b/aarch64/full/spec.sail @@ -2130,6 +2130,8 @@ val Replicate : forall ('M : Int) ('N : Int), 'M >= 0 & 'N >= 0. function Replicate x = { assert('N % 'M == 0, "((N MOD M) == 0)"); + let 'O = 'N / 'M; + assert(constraint('O * 'M = 'N)); return(replicate_bits(x, 'N / 'M)) } |