Small bugfix in cliford/perm

quil-lang · Oct 19, 2023 · ac4effe · ac4effe
1 parent b3c3480
commit ac4effe
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/cl-quil-tests.asd b/cl-quil-tests.asd
@@ -40,7 +40,7 @@
                (:file "cfg-tests")
                (:file "defcircuit-tests")
                (:file "compilation-tests")
-               ;(:file "clifford-tests")
+               (:file "clifford-tests")
                (:file "translator-tests")
                (:file "rewrite-tests")
                (:file "state-prep-tests")

diff --git a/src/clifford/perm.lisp b/src/clifford/perm.lisp
@@ -35,7 +35,7 @@
   "Convert a Clifford group element C into a permutation representation."
   (let* ((num-qubits (num-qubits c))
          (num-points (clifford-perm-degree num-qubits))
-         (rep (perm::iota-vector (1+ num-points))))
+         (rep (perm::iota-vector (1+ num-points) :element-type 'perm::perm-element)))
     (dotimes (i num-points (perm::%make-perm rep))
       ;; The 2*(2 + i) and x/2 - 2 are to convert in/out from integers
       ;; which keep track of +-i/I and which don't.