From a3bbce395607768354e92f34d3db34a5c0c4d73e Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@slava-pestovs-macbook-pro.local>
Date: Tue, 9 Sep 2008 23:38:40 -0500
Subject: [PATCH] Add a couple of onlinline inline declarations

---
 core/sequences/sequences.factor | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/core/sequences/sequences.factor b/core/sequences/sequences.factor
index 9be2db3fd7..e5c6b5ad99 100755
--- a/core/sequences/sequences.factor
+++ b/core/sequences/sequences.factor
@@ -739,10 +739,10 @@ PRIVATE>
     [ but-last ] [ peek ] bi ;
 
 : unclip-slice ( seq -- rest first )
-    [ rest-slice ] [ first ] bi ;
+    [ rest-slice ] [ first ] bi ; inline
 
 : unclip-last-slice ( seq -- butfirst last )
-    [ but-last-slice ] [ peek ] bi ;
+    [ but-last-slice ] [ peek ] bi ; inline
 
 : <flat-slice> ( seq -- slice )
     dup slice? [ { } like ] when 0 over length rot <slice> ;