RING-BUFFER-CREATELIST2INSTANTIATE-FLAVORRING-BUFFERMAXIMUM-SIZE	RING-BUFFER$DESCRIBEPRINTFPTRSIZEVECRING-BUFFER$DEFAULT-INIT*UNBOUND*RING-BUFFER$SIZERING-BUFFER$MAXIMUM-SIZERING-BUFFER$INITMKVECTRING-BUFFER$PUSHRING-BUFFER$TOPRING-BUFFER$FETCHRING-BUFFER$POPRING-BUFFER-MODRING-BUFFER$ROTATERING-BUFFER-PUSHOBJECT-GET-HANDLERFASTAPPLYPUSHRING-BUFFER-TOPTOPRING-BUFFER-POPPOPOBJECTSEVLOADPUTENTRYGETASSOCIATION-CREATEPUT
$FLAVOR-DEFINE-METHODROTATEFETCHINITDEFAULT-INITDESCRIBEINITABLE-VARIABLESVARIABLE-NAMES	INSTANCE-VECTOR-SIZEMETHOD-TABLEEXPRAr  ,  +<<  %w: %p%nAn object of flavor RING-BUFFER, has instance variable values:%n,> , x   , x   , x   , x   , >,~<<<< '2L+!Z, L '2L+#@@ '2L+&O@O@,~ ,~< ,~ ,~,> >, x B8>,~,> : 
 x    &>bF>n?3b+6@@ x3*8+9 : x B8 x J8  x.8 D >,~x@@+	 7`+H  .D >6 +I > D,~ ,~,>,>7`+P  .,
 x.8 +P >,~,>,>7`+W  .,
 x B8+X >,~ & 5"\.F,~,>,> b,  x  >+<,> g,  x >+<
,> l,  x >+<<<@<o<<@<p<q<<@ A,Z& @ @, ? ?,2B+z,  ? ?,Z& > ?, > = ?, = < ?, < ; ?,Z& @ <, ; : ?,Z& @ ;, : 9 ?,Z&( @ :, 9 8 ?,Z&) @ 9, 8 7 ?,Z&+ @ 8, 7 6 ?,Z&/ @ 7, 6 5 ?,Z&@ @ 6, 5 4 ?,Z&A @ 5, 4 3 ?,Z&J @ 4, 3 2 ?,Z&R @ 3,Z&Y @ 2,Z&] @ 1,Z&c @ 1,Z&h @ 0+<<
<<
<<
<<	<<	<
<<<<<<<<<<<<<<l<m<<<<<n
x( T
@|DD@
D@@@ X(~EU

UU*Q*TU**EU"U(UT*U
UE*Q(TT*?x