diff --git a/src/compiler/float-tran.lisp b/src/compiler/float-tran.lisp
index 9ce1ab251f05da22c047e76498c13ac2a8514d9d..e89952790e44ba8023808aa4268155d816804928 100644
--- a/src/compiler/float-tran.lisp
+++ b/src/compiler/float-tran.lisp
@@ -236,7 +236,7 @@
   (frob %random-single-float single-float)
   (frob %random-double-float double-float))
 
-#-(or new-random random-mt19937)
+#-(or new-random random-mt19937 rand-xoroshiro)
 (deftransform random ((num &optional state)
 		      ((integer 1 #.random-fixnum-max) &optional *))
   _N"use inline fixnum operations"
@@ -259,7 +259,7 @@
   '(values (truncate (%random-double-float (coerce num 'double-float)
 		      (or state *random-state*)))))
 
-#+random-mt19937
+#+(or random-mt19937)
 (deftransform random ((num &optional state)
 		      ((integer 1 #.(expt 2 32)) &optional *))
   _N"use inline (unsigned-byte 32) operations"