From f0420e8abbfba2920d951b2e9a88d4aeadcae2f9 Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Fri, 11 Jul 2008 01:06:23 -0500 Subject: [PATCH] Fix declaration --- extra/models/history/history.factor | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/extra/models/history/history.factor b/extra/models/history/history.factor index c5bd705144..ab79d66eb6 100755 --- a/extra/models/history/history.factor +++ b/extra/models/history/history.factor @@ -5,9 +5,9 @@ IN: models.history TUPLE: history < model back forward ; -: reset-history ( history -- ) +: reset-history ( history -- history ) V{ } clone >>back - V{ } clone >>forward ; + V{ } clone >>forward ; inline : ( value -- history ) history new-model