From 0a7b62177bb2a62e928a8a76bfe56bede9137bb4 Mon Sep 17 00:00:00 2001
From: Joe Groff <arcata@gmail.com>
Date: Mon, 31 Aug 2009 18:04:09 -0500
Subject: [PATCH] link S{ and S@ docs in classes.struct
---
basis/classes/struct/struct-docs.factor | 2 ++
1 file changed, 2 insertions(+)
diff --git a/basis/classes/struct/struct-docs.factor b/basis/classes/struct/struct-docs.factor
index 031e4492a5..8a67f00354 100644
--- a/basis/classes/struct/struct-docs.factor
+++ b/basis/classes/struct/struct-docs.factor
@@ -47,6 +47,8 @@ HELP: S@
{ $values { "class" "a " { $link struct } " class word" } { "alien" "a literal alien" } }
{ $description "Marks the beginning of a literal struct at a specific C address. The prettyprinter uses this syntax when the memory backing a struct object is invalid. This syntax should not generally be used in source code." } ;
+{ POSTPONE: S{ POSTPONE: S@ } related-words
+
HELP: UNION-STRUCT:
{ $syntax "UNION-STRUCT: class { slot type } { slot type } ... ;" }
{ $values { "class" "a new " { $link struct } " class to define" } { "slots" "a list of slot specifiers" } }