# HG changeset patch
# User Steve Losh <steve@stevelosh.com>
# Date 1518374072 18000
# Node ID 8ac3147a3182eac05a9b053bcbee49939a7f2057
# Parent  9e2c59c4c13d53028b0d67db3e7d8183d3a6b5ff
Rename global generator

diff -r 9e2c59c4c13d -r 8ac3147a3182 src/pcg.lisp
--- a/src/pcg.lisp	Mon Jan 15 15:50:53 2018 -0500
+++ b/src/pcg.lisp	Sun Feb 11 13:34:32 2018 -0500
@@ -268,14 +268,14 @@
   (make-pcg% (resolve-seed seed) stream-id))
 
 
-(defparameter *global-pcg* (make-pcg))
+(defparameter *global-generator* (make-pcg))
 
 (deftype pcg-designator ()
   '(or (eql t) pcg))
 
 (defun-inline resolve-pcg (pcg-designator)
   (if (eq t pcg-designator)
-    *global-pcg*
+    *global-generator*
     pcg-designator))