From: nomennescio <nomennescio@factorcode.org>
Date: Mon, 9 Oct 2023 22:30:25 +0000 (+0200)
Subject: Make slice a wrapped-sequence
X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=commitdiff_plain;h=ee95fbe81ec3ec96fb631be8467c110240ba34ed

Make slice a wrapped-sequence
---

diff --git a/core/sequences/sequences.factor b/core/sequences/sequences.factor
index 43df76fb9c..b73a374cc3 100644
--- a/core/sequences/sequences.factor
+++ b/core/sequences/sequences.factor
@@ -255,8 +255,6 @@ PRIVATE>
 : <slice> ( from to seq -- slice )
     check-slice <slice-unsafe> ; inline
 
-M: slice virtual-exemplar seq>> ; inline
-
 M: slice virtual@ [ from>> + ] [ seq>> ] bi ; inline
 
 M: slice length [ to>> ] [ from>> ] bi - ; inline
@@ -273,7 +271,7 @@ M: slice length [ to>> ] [ from>> ] bi - ; inline
 
 : but-last-slice ( seq -- slice ) 1 head-slice* ; inline
 
-INSTANCE: slice virtual-sequence
+INSTANCE: slice wrapped-sequence
 
 ! One element repeated many times
 TUPLE: repetition