2020-08-08 19:40:02 +03:00
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
< html >
< head >
< title > Relating< / title >
< link href = "../docs-assets/Breadcrumbs.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< meta name = "viewport" content = "width=device-width initial-scale=1" >
< meta http-equiv = "Content-Type" content = "text/html; charset=utf-8" >
< meta http-equiv = "Content-Language" content = "en-gb" >
< link href = "../docs-assets/Contents.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Progress.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Navigation.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Fonts.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Base.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Colours.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< / head >
< body class = "commentary-font" >
< nav role = "navigation" >
< h1 > < a href = "../index.html" >
< img src = "../docs-assets/Inform.png" height = 72" >
< / a > < / h1 >
2022-04-04 20:31:44 +03:00
< ul > < li > < a href = "../index.html" > home< / a > < / li >
< / ul > < h2 > Compiler< / h2 > < ul >
< li > < a href = "../structure.html" > structure< / a > < / li >
< li > < a href = "../inbuildn.html" > inbuild< / a > < / li >
< li > < a href = "../inform7n.html" > inform7< / a > < / li >
< li > < a href = "../intern.html" > inter< / a > < / li >
< li > < a href = "../services.html" > services< / a > < / li >
2022-04-18 17:46:46 +03:00
< li > < a href = "../secrets.html" > secrets< / a > < / li >
2022-04-04 20:31:44 +03:00
< / ul > < h2 > Other Tools< / h2 > < ul >
< li > < a href = "../inblorbn.html" > inblorb< / a > < / li >
< li > < a href = "../indocn.html" > indoc< / a > < / li >
< li > < a href = "../inform6.html" > inform6< / a > < / li >
< li > < a href = "../inpolicyn.html" > inpolicy< / a > < / li >
< li > < a href = "../inrtpsn.html" > inrtps< / a > < / li >
2022-04-05 14:14:27 +03:00
< / ul > < h2 > Resources< / h2 > < ul >
< li > < a href = "../extensions.html" > extensions< / a > < / li >
< li > < a href = "../kits.html" > kits< / a > < / li >
2022-04-04 20:31:44 +03:00
< / ul > < h2 > Repository< / h2 > < ul >
< li > < a href = "https://github.com/ganelson/inform" > < img src = "../docs-assets/github.png" height = 18 > github< / a > < / li >
< / ul > < h2 > Related Projects< / h2 > < ul >
< li > < a href = "../../../inweb/docs/index.html" > inweb< / a > < / li >
< li > < a href = "../../../intest/docs/index.html" > intest< / a > < / li >
2020-08-08 19:40:02 +03:00
< / ul >
< / nav >
< main role = "main" >
<!-- Weave of 'Relating' generated by Inweb -->
< div class = "breadcrumbs" >
2022-04-04 20:31:44 +03:00
< ul class = "crumbs" > < li > < a href = "../index.html" > Home< / a > < / li > < li > < a href = "../services.html" > Services< / a > < / li > < li > < a href = "index.html" > kinds-test< / a > < / li > < li > < a href = "index.html#1" > Chapter 1: Scaffolding< / a > < / li > < li > < b > Relating< / b > < / li > < / ul > < / div >
2020-08-08 19:40:02 +03:00
< p class = "purpose" > Providing a sense of meaning for relationships.< / p >
2020-08-18 00:57:45 +03:00
< p class = "commentary firstcommentary" > < a id = "SP1" class = "paragraph-anchor" > < / a > < b > § 1. < / b > This test tool uses the < a href = "../linguistics-module/index.html" class = "internal" > linguistics< / a > module, and it needs to have some
2020-08-08 19:40:02 +03:00
concept of what relationships are — that is, of what might be meant by
"X sees Y" or "X is on top of Y".
< / p >
< p class = "commentary" > Inform uses a class called < span class = "extract" > < span class = "extract-syntax" > binary_predicate< / span > < / span > for this, but we will use a
class simply called < span class = "extract" > < span class = "extract-syntax" > rel< / span > < / span > .
< / p >
< pre class = "definitions code-font" > < span class = "definition-keyword" > enum< / span > < span class = "constant-syntax" > rel_CLASS< / span >
< span class = "definition-keyword" > define< / span > < span class = "constant-syntax" > VERB_MEANING_LINGUISTICS_TYPE< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > rel< / span >
< / pre >
2020-08-18 00:57:45 +03:00
< p class = "commentary firstcommentary" > < a id = "SP2" class = "paragraph-anchor" > < / a > < b > § 2. < / b > < a href = "../linguistics-module/index.html" class = "internal" > linguistics< / a > also needs us to make annotation functions for one special
2020-08-08 19:40:02 +03:00
annotation it uses. (It can't do this itself without knowing the type.) But
we don't need to create the annotation or give it permissions.
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "identifier-syntax" > DECLARE_ANNOTATION_FUNCTIONS< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > relationship< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > rel< / span > < span class = "plain-syntax" > )< / span >
< / pre >
2020-08-18 00:57:45 +03:00
< p class = "commentary firstcommentary" > < a id = "SP3" class = "paragraph-anchor" > < / a > < b > § 3. < / b > < / p >
2020-08-08 19:40:02 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "identifier-syntax" > DECLARE_CLASS< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > rel< / span > < span class = "plain-syntax" > )< / span >
< span class = "identifier-syntax" > MAKE_ANNOTATION_FUNCTIONS< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > relationship< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > rel< / span > < span class = "plain-syntax" > )< / span >
< / pre >
2020-08-18 00:57:45 +03:00
< p class = "commentary firstcommentary" > < a id = "SP4" class = "paragraph-anchor" > < / a > < b > § 4. < / b > There isn't much to this, since all we want to be able to do is to
2020-08-08 19:40:02 +03:00
print out a name.
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > typedef< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > rel< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > debugging_log_name< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > rel< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > reversed< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "constant-syntax" > CLASS_DEFINITION< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > rel< / span > < span class = "plain-syntax" > ;< / span >
< / pre >
< ul class = "endnotetexts" > < li > The structure rel is accessed in 1/dgr, 3/vm and here.< / li > < / ul >
2020-08-18 00:57:45 +03:00
< p class = "commentary firstcommentary" > < a id = "SP5" class = "paragraph-anchor" > < / a > < b > § 5. < / b > < a href = "../linguistics-module/index.html" class = "internal" > linguistics< / a > requires that whatever this is, it has to be "reversible".
2020-08-08 19:40:02 +03:00
(This transposes the two terms. The reversal of "X sees Y" is "X is seen by Y".)
< / p >
< pre class = "definitions code-font" > < span class = "definition-keyword" > define< / span > < span class = "constant-syntax" > VERB_MEANING_REVERSAL_LINGUISTICS_CALLBACK< / span > < span class = "plain-syntax" > < / span > < a href = "1-rlt.html#SP5" class = "function-link" > < span class = "function-syntax" > Relating::reverse_rel< / span > < / a >
< / pre >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > rel< / span > < span class = "plain-syntax" > *< / span > < span class = "function-syntax" > Relating::reverse_rel< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > rel< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > R< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > R< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > reversed< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
2020-08-18 00:57:45 +03:00
< p class = "commentary firstcommentary" > < a id = "SP6" class = "paragraph-anchor" > < / a > < b > § 6. < / b > < a href = "../linguistics-module/index.html" class = "internal" > linguistics< / a > also wants to know the identities of two special meanings,
2020-08-08 19:40:02 +03:00
roughly those of the verbs "to be" and "to have". So it requires us to define
these two macros:
< / p >
< pre class = "definitions code-font" > < span class = "definition-keyword" > define< / span > < span class = "constant-syntax" > VERB_MEANING_EQUALITY< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > R_equality< / span >
< span class = "definition-keyword" > define< / span > < span class = "constant-syntax" > VERB_MEANING_POSSESSION< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > R_possession< / span >
< / pre >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > rel< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > R_equality< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ;< / span >
< span class = "reserved-syntax" > rel< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > R_possession< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ;< / span >
< / pre >
2020-08-18 00:57:45 +03:00
< p class = "commentary firstcommentary" > < a id = "SP7" class = "paragraph-anchor" > < / a > < b > § 7. < / b > And so we will create rels in pairs, and the first two (pairs) to be created
2020-08-08 19:40:02 +03:00
must be for equality and possession:
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > rel< / span > < span class = "plain-syntax" > *< / span > < span class = "function-syntax" > Relating::new< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > wording< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > TEMPORARY_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > name< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > name< / span > < span class = "plain-syntax" > , < / span > < span class = "string-syntax" > "%W"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > rel< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > R< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > CREATE< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > rel< / span > < span class = "plain-syntax" > ), *< / span > < span class = "identifier-syntax" > RR< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > CREATE< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > rel< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > R< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > debugging_log_name< / span > < span class = "plain-syntax" > = < / span > < a href = "../../../inweb/docs/foundation-module/4-sm.html#SP3" class = "function-link" > < span class = "function-syntax" > Str::duplicate< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > name< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > name< / span > < span class = "plain-syntax" > , < / span > < span class = "string-syntax" > "-reversed"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > RR< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > debugging_log_name< / span > < span class = "plain-syntax" > = < / span > < a href = "../../../inweb/docs/foundation-module/4-sm.html#SP3" class = "function-link" > < span class = "function-syntax" > Str::duplicate< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > name< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > R< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > reversed< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > RR< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > RR< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > reversed< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > R< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > R_equality< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > R_equality< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > R< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > R_possession< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > R_possession< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > R< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > DISCARD_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > name< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > R< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
2020-08-18 00:57:45 +03:00
< p class = "commentary firstcommentary" > < a id = "SP8" class = "paragraph-anchor" > < / a > < b > § 8. < / b > This function finds a rel by name.
2020-08-08 19:40:02 +03:00
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > rel< / span > < span class = "plain-syntax" > *< / span > < span class = "function-syntax" > Relating::find< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > wording< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > TEMPORARY_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > name< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > name< / span > < span class = "plain-syntax" > , < / span > < span class = "string-syntax" > "%W"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > rel< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > T< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LOOP_OVER< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > T< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > rel< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < a href = "../../../inweb/docs/foundation-module/4-sm.html#SP19" class = "function-link" > < span class = "function-syntax" > Str::eq_insensitive< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > T< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > debugging_log_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > name< / span > < span class = "plain-syntax" > ))< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > break< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > DISCARD_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > name< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > T< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
< nav role = "progress" > < div class = "progresscontainer" >
< ul class = "progressbar" > < li class = "progressprev" > < a href = "1-pc.html" > ❮ < / a > < / li > < li class = "progresscurrentchapter" > 1< / li > < li class = "progresssection" > < a href = "1-pc.html" > pc< / a > < / li > < li class = "progresscurrent" > rlt< / li > < li class = "progresssection" > < a href = "1-dcl.html" > dcl< / a > < / li > < li class = "progressnext" > < a href = "1-dcl.html" > ❯ < / a > < / li > < / ul > < / div >
< / nav > <!-- End of weave -->
< / main >
< / body >
< / html >