Index: bin/ksh/var.c
===================================================================
RCS file: /cvs/src/bin/ksh/var.c,v
retrieving revision 1.72
diff -u -p -u -p -r1.72 var.c
--- bin/ksh/var.c	5 Mar 2021 15:22:03 -0000	1.72
+++ bin/ksh/var.c	9 Nov 2022 15:58:29 -0000
@@ -886,7 +886,7 @@ makenv(void)
 void
 change_random(void)
 {
-	rand();
+	arc4random();
 }
 
 /*
@@ -938,7 +938,7 @@ getspec(struct tbl *vp)
 		break;
 	case V_RANDOM:
 		vp->flag &= ~SPECIAL;
-		setint(vp, (int64_t) (rand() & 0x7fff));
+		setint(vp, (int64_t) (arc4random() & 0x7fff));
 		vp->flag |= SPECIAL;
 		break;
 	case V_HISTSIZE: