When I compile a system depending on random-state, I get the following warnings:
STYLE-WARNING:
Generic function RANDOM-STATE:BYTES clobbers an earlier FTYPE proclamation
(FUNCTION (RANDOM-STATE:GENERATOR) (VALUES (UNSIGNED-BYTE 8) &REST T)) for
the same name with (FUNCTION (T) *).
STYLE-WARNING:
Generic function RANDOM-STATE:RANDOM-BYTE clobbers an earlier FTYPE
proclamation
(FUNCTION (RANDOM-STATE:GENERATOR) (VALUES UNSIGNED-BYTE &REST T)) for the
same name with (FUNCTION (T) *).
STYLE-WARNING:
Generic function RANDOM-STATE:RANDOM-BYTES clobbers an earlier FTYPE
proclamation
(FUNCTION (RANDOM-STATE:GENERATOR INTEGER) (VALUES UNSIGNED-BYTE &REST T))
for the same name with (FUNCTION (T T) *).
STYLE-WARNING:
Generic function RANDOM-STATE:RANDOM-FLOAT clobbers an earlier FTYPE
proclamation
(FUNCTION (RANDOM-STATE:GENERATOR REAL REAL) (VALUES DOUBLE-FLOAT &REST T))
for the same name with (FUNCTION (T T T) *).
STYLE-WARNING:
Generic function RANDOM-STATE:RANDOM-INT clobbers an earlier FTYPE
proclamation
(FUNCTION (RANDOM-STATE:GENERATOR INTEGER INTEGER) (VALUES INTEGER &REST T))
for the same name with (FUNCTION (T T T) *).
STYLE-WARNING:
Generic function RANDOM-STATE:RESEED clobbers an earlier FTYPE proclamation
(FUNCTION (RANDOM-STATE:GENERATOR &OPTIONAL T)
(VALUES RANDOM-STATE:GENERATOR &REST T))
for the same name with (FUNCTION (T &OPTIONAL T) *).
STYLE-WARNING:
Generic function RANDOM-STATE:RANDOM-BYTE clobbers an earlier FTYPE
proclamation
(FUNCTION (RANDOM-STATE:GENERATOR) (VALUES DOUBLE-FLOAT &REST T)) for the
same name with (FUNCTION (T) *).
STYLE-WARNING:
Generic function RANDOM-STATE::INDEX clobbers an earlier FTYPE proclamation
(FUNCTION (T) (VALUES FIXNUM &REST T)) for the same name with
(FUNCTION (T) *).
When I compile a system depending on random-state, I get the following warnings: