Revert "peg: make check-action inline."

This reverts commit 58aced026273bb9d0df8278db8030b9eb1da9370.

diff --git a/basis/peg/peg.factor b/basis/peg/peg.factor
index 5f644b5e914266ecd42e9481ffef7cb3218adeb0..5168230588fe5c5350e7178f47eed9c219cfcbd5 100644 (file)
--- a/basis/peg/peg.factor
+++ b/basis/peg/peg.factor
@@ -461,7 +461,7 @@ M: ensure-not-parser (compile)
 TUPLE: action-parser parser quot ;
 
 : check-action ( result quot -- result )
-    dupd '[ _ change-ast ] when ; inline
+    dupd '[ [ _ call( ast -- ast ) ] change-ast ] when ;
 
 M: action-parser (compile)
     [ parser>> compile-parser-quot ] [ quot>> ] bi