From 5f7c522414a1339948beed6c7beb38df5fc111fb Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Sat, 25 Jun 2016 16:32:06 -0700
Subject: [PATCH] kernel-docs: half-baked idea.

---
 core/kernel/kernel-docs.factor | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/core/kernel/kernel-docs.factor b/core/kernel/kernel-docs.factor
index 31a595f8e4..e93e2b3d82 100644
--- a/core/kernel/kernel-docs.factor
+++ b/core/kernel/kernel-docs.factor
@@ -107,6 +107,14 @@ $examples{
     $example{ "USING: kernel prettyprint ;" "5 5.0 = ." "f" }
     $example{ "USING: arrays kernel prettyprint ;" "{ \"a\" \"b\" } \"a\" \"b\" 2array = ." "t" }
     $example{ "USING: arrays kernel prettyprint ;" "{ \"a\" \"b\" } [ \"a\" \"b\" ] = ." "f" }
+    ![[
+    $fexample{
+        $factor{{ USING: arrays kernel prettyprint ;
+            { \"a\" \"b\" } [ \"a\" \"b\" ] =
+        }}
+        { f }
+    }
+    ]]
 } ;
 
 HELP: equal?