2020-02-27 13:18:25 +02:00
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
< html >
< head >
< title > 2/arc< / title >
2020-03-19 02:11:25 +02:00
< meta name = "viewport" content = "width=device-width initial-scale=1" >
2020-02-27 13:18:25 +02:00
< meta http-equiv = "Content-Type" content = "text/html; charset=utf-8" >
< meta http-equiv = "Content-Language" content = "en-gb" >
2020-03-19 02:11:25 +02:00
< link href = "../inweb.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
2020-02-27 13:18:25 +02:00
< / head >
< body >
2020-03-19 02:11:25 +02:00
< nav role = "navigation" >
< h1 > < a href = "../webs.html" > Sources< / a > < / h1 >
< ul >
2020-03-28 21:42:53 +02:00
< li > < a href = "../compiler.html" > < b > compiler tools< / b > < / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../other.html" > other tools< / a > < / li >
< li > < a href = "../extensions.html" > extensions and kits< / a > < / li >
< li > < a href = "../units.html" > unit test tools< / a > < / li >
< / ul >
< h2 > Compiler Webs< / h2 >
< ul >
< li > < a href = "../inbuild/index.html" > inbuild< / a > < / li >
< li > < a href = "../inform7/index.html" > inform7< / a > < / li >
< li > < a href = "../inter/index.html" > inter< / a > < / li >
< / ul >
< h2 > Inbuild Modules< / h2 >
< ul >
< li > < a href = "../inbuild-module/index.html" > inbuild< / a > < / li >
< li > < a href = "../arch-module/index.html" > arch< / a > < / li >
< li > < a href = "../words-module/index.html" > words< / a > < / li >
< li > < a href = "../syntax-module/index.html" > syntax< / a > < / li >
< li > < a href = "../html-module/index.html" > html< / a > < / li >
< / ul >
< h2 > Inform7 Modules< / h2 >
< ul >
< li > < a href = "../core-module/index.html" > core< / a > < / li >
< li > < a href = "../problems-module/index.html" > problems< / a > < / li >
< li > < a href = "../inflections-module/index.html" > inflections< / a > < / li >
< li > < a href = "../linguistics-module/index.html" > linguistics< / a > < / li >
< li > < a href = "../kinds-module/index.html" > kinds< / a > < / li >
< li > < a href = "../if-module/index.html" > if< / a > < / li >
< li > < a href = "../multimedia-module/index.html" > multimedia< / a > < / li >
< li > < a href = "../index-module/index.html" > index< / a > < / li >
< / ul >
< h2 > Inter Modules< / h2 >
< ul >
< li > < a href = "../inter-module/index.html" > inter< / a > < / li >
< li > < a href = "../building-module/index.html" > building< / a > < / li >
< li > < a href = "../codegen-module/index.html" > codegen< / a > < / li >
< / ul >
< h2 > Foundation< / h2 >
< ul >
< li > < a href = "../../../inweb/docs/foundation-module/index.html" > foundation< / a > < / li >
< / ul >
< / nav >
< main role = "main" >
2020-02-27 13:18:25 +02:00
<!-- Weave of '2/tvm' generated by 7 -->
2020-03-22 12:50:19 +02:00
< ul class = "crumbs" > < li > < a href = "../webs.html" > Source< / a > < / li > < li > < a href = "../compiler.html" > Compiler Modules< / a > < / li > < li > < a href = "index.html" > arch< / a > < / li > < li > < a href = "index.html#2" > Chapter 2: Architectures< / a > < / li > < li > < b > Target Virtual Machines< / b > < / li > < / ul > < p class = "purpose" > To deal with multiple inter architectures.< / p >
2020-02-27 13:18:25 +02:00
< ul class = "toc" > < li > < a href = "#SP1" > § 1. Architectures< / a > < / li > < / ul > < hr class = "tocbar" >
< p class = "inwebparagraph" > < a id = "SP1" > < / a > < b > § 1. Architectures. < / b > < / p >
< pre class = "display" >
< span class = "reserved" > typedef< / span > < span class = "plain" > < / span > < span class = "reserved" > struct< / span > < span class = "plain" > < / span > < span class = "reserved" > target_vm< / span > < span class = "plain" > {< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > struct< / span > < span class = "plain" > < / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > family_name< / span > < span class = "plain" > ; < / span > < span class = "comment" > such as < code class = "display" > < span class = "extract" > Glulx< / span > < / code > < / span >
2020-02-27 13:18:25 +02:00
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > with_debugging_enabled< / span > < span class = "plain" > ;< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > struct< / span > < span class = "plain" > < / span > < span class = "reserved" > inter_architecture< / span > < span class = "plain" > *< / span > < span class = "identifier" > architecture< / span > < span class = "plain" > ; < / span > < span class = "comment" > such as 32d< / span >
< span class = "reserved" > struct< / span > < span class = "plain" > < / span > < span class = "identifier" > semantic_version_number< / span > < span class = "plain" > < / span > < span class = "identifier" > version< / span > < span class = "plain" > ; < / span > < span class = "comment" > such as 0.8.7< / span >
< span class = "reserved" > struct< / span > < span class = "plain" > < / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > VM_extension< / span > < span class = "plain" > ; < / span > < span class = "comment" > canonical filename extension< / span >
< span class = "reserved" > struct< / span > < span class = "plain" > < / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > VM_unblorbed_extension< / span > < span class = "plain" > ; < / span > < span class = "comment" > such as < code class = "display" > < span class = "extract" > z8< / span > < / code > < / span >
< span class = "reserved" > struct< / span > < span class = "plain" > < / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > VM_blorbed_extension< / span > < span class = "plain" > ; < / span > < span class = "comment" > when blorbed up< / span >
< span class = "reserved" > struct< / span > < span class = "plain" > < / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > VM_image< / span > < span class = "plain" > ; < / span > < span class = "comment" > filename of image for icon denoting VM< / span >
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > max_locals< / span > < span class = "plain" > ; < / span > < span class = "comment" > upper limit on local variables per stack frame< / span >
< span class = "reserved" > struct< / span > < span class = "plain" > < / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > default_browser_interpreter< / span > < span class = "plain" > ; < / span > < span class = "comment" > e.g., "Parchment"< / span >
< span class = "reserved" > struct< / span > < span class = "plain" > < / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > iFiction_format_name< / span > < span class = "plain" > ; < / span > < span class = "comment" > e.g., "zcode": see the Treaty of Babel< / span >
2020-02-27 13:18:25 +02:00
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > supports_floating_point< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > MEMORY_MANAGEMENT< / span >
< span class = "plain" > } < / span > < span class = "reserved" > target_vm< / span > < span class = "plain" > ;< / span >
2020-03-23 23:42:00 +02:00
< span class = "reserved" > target_vm< / span > < span class = "plain" > *< / span > < span class = "functiontext" > TargetVMs::new< / span > < span class = "plain" > (< / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > code< / span > < span class = "plain" > , < / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > nick< / span > < span class = "plain" > , < / span > < span class = "identifier" > semantic_version_number< / span > < span class = "plain" > < / span > < span class = "identifier" > V< / span > < span class = "plain" > ,< / span >
2020-02-27 13:18:25 +02:00
< span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > image< / span > < span class = "plain" > , < / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > interpreter< / span > < span class = "plain" > , < / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > blorbed< / span > < span class = "plain" > , < / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > arch< / span > < span class = "plain" > ,< / span >
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > debug< / span > < span class = "plain" > , < / span > < span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > max_locals< / span > < span class = "plain" > , < / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > iFiction< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > target_vm< / span > < span class = "plain" > *< / span > < span class = "identifier" > VM< / span > < span class = "plain" > = < / span > < span class = "identifier" > CREATE< / span > < span class = "plain" > (< / span > < span class = "reserved" > target_vm< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > family_name< / span > < span class = "plain" > = < / span > < span class = "identifier" > Str::duplicate< / span > < span class = "plain" > (< / span > < span class = "identifier" > code< / span > < span class = "plain" > );< / span >
< span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > version< / span > < span class = "plain" > = < / span > < span class = "identifier" > V< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > VM_extension< / span > < span class = "plain" > = < / span > < span class = "identifier" > Str::duplicate< / span > < span class = "plain" > (< / span > < span class = "identifier" > nick< / span > < span class = "plain" > );< / span >
< span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > VM_unblorbed_extension< / span > < span class = "plain" > = < / span > < span class = "identifier" > Str::duplicate< / span > < span class = "plain" > (< / span > < span class = "identifier" > nick< / span > < span class = "plain" > );< / span >
< span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > VM_blorbed_extension< / span > < span class = "plain" > = < / span > < span class = "identifier" > Str::duplicate< / span > < span class = "plain" > (< / span > < span class = "identifier" > blorbed< / span > < span class = "plain" > );< / span >
< span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > VM_image< / span > < span class = "plain" > = < / span > < span class = "identifier" > Str::duplicate< / span > < span class = "plain" > (< / span > < span class = "identifier" > image< / span > < span class = "plain" > );< / span >
< span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > max_locals< / span > < span class = "plain" > = < / span > < span class = "identifier" > max_locals< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > default_browser_interpreter< / span > < span class = "plain" > = < / span > < span class = "identifier" > Str::duplicate< / span > < span class = "plain" > (< / span > < span class = "identifier" > interpreter< / span > < span class = "plain" > );< / span >
< span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > architecture< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Architectures::from_codename< / span > < span class = "plain" > (< / span > < span class = "identifier" > arch< / span > < span class = "plain" > );< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > architecture< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "no such architecture"< / span > < span class = "plain" > );< / span >
< span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > with_debugging_enabled< / span > < span class = "plain" > = < / span > < span class = "identifier" > debug< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > supports_floating_point< / span > < span class = "plain" > = < / span > < span class = "identifier" > TRUE< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "functiontext" > Architectures::is_16_bit< / span > < span class = "plain" > (< / span > < span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "identifier" > architecture< / span > < span class = "plain" > )) < / span > < span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > supports_floating_point< / span > < span class = "plain" > = < / span > < span class = "identifier" > FALSE< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > iFiction_format_name< / span > < span class = "plain" > = < / span > < span class = "identifier" > Str::duplicate< / span > < span class = "plain" > (< / span > < span class = "identifier" > iFiction< / span > < span class = "plain" > );< / span >
2020-02-27 13:18:25 +02:00
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > VM< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > TargetVMs::write< / span > < span class = "plain" > (< / span > < span class = "identifier" > OUTPUT_STREAM< / span > < span class = "plain" > , < / span > < span class = "reserved" > target_vm< / span > < span class = "plain" > *< / span > < span class = "identifier" > VM< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > VM< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "identifier" > WRITE< / span > < span class = "plain" > (< / span > < span class = "string" > "none"< / span > < span class = "plain" > );< / span >
< span class = "reserved" > else< / span > < span class = "plain" > {< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > WRITE< / span > < span class = "plain" > (< / span > < span class = "string" > "%S"< / span > < span class = "plain" > , < / span > < span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > family_name< / span > < span class = "plain" > );< / span >
< span class = "identifier" > semantic_version_number< / span > < span class = "plain" > < / span > < span class = "identifier" > V< / span > < span class = "plain" > = < / span > < span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > version< / span > < span class = "plain" > ;< / span >
2020-03-23 23:42:00 +02:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > VersionNumbers::is_null< / span > < span class = "plain" > (< / span > < span class = "identifier" > V< / span > < span class = "plain" > ) == < / span > < span class = "identifier" > FALSE< / span > < span class = "plain" > ) < / span > < span class = "identifier" > WRITE< / span > < span class = "plain" > (< / span > < span class = "string" > " version %v"< / span > < span class = "plain" > , & < / span > < span class = "identifier" > V< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > with_debugging_enabled< / span > < span class = "plain" > ) < / span > < span class = "identifier" > WRITE< / span > < span class = "plain" > (< / span > < span class = "string" > " with debugging"< / span > < span class = "plain" > );< / span >
2020-02-27 13:18:25 +02:00
< span class = "plain" > }< / span >
< span class = "plain" > }< / span >
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > TargetVMs::create< / span > < span class = "plain" > (< / span > < span class = "reserved" > void< / span > < span class = "plain" > ) {< / span >
< span class = "comment" > hat tip: Joel Berez and Marc Blank, 1979, and later hands< / span >
2020-03-23 23:42:00 +02:00
< span class = "functiontext" > TargetVMs::new< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "string" > "Z-Machine"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "z5"< / span > < span class = "plain" > , < / span > < span class = "identifier" > VersionNumbers::from_text< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "string" > "5"< / span > < span class = "plain" > ),< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > I< / span > < span class = "string" > "vm_z5.png"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "Parchment"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "zblorb"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "16"< / span > < span class = "plain" > , < / span > < span class = "identifier" > FALSE< / span > < span class = "plain" > , < / span > < span class = "constant" > 15< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "zcode"< / span > < span class = "plain" > );< / span >
2020-03-23 23:42:00 +02:00
< span class = "functiontext" > TargetVMs::new< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "string" > "Z-Machine"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "z5"< / span > < span class = "plain" > , < / span > < span class = "identifier" > VersionNumbers::from_text< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "string" > "5"< / span > < span class = "plain" > ),< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > I< / span > < span class = "string" > "vm_z5.png"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "Parchment"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "zblorb"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "16d"< / span > < span class = "plain" > , < / span > < span class = "identifier" > TRUE< / span > < span class = "plain" > , < / span > < span class = "constant" > 15< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "zcode"< / span > < span class = "plain" > );< / span >
2020-02-27 13:18:25 +02:00
2020-03-23 23:42:00 +02:00
< span class = "functiontext" > TargetVMs::new< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "string" > "Z-Machine"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "z8"< / span > < span class = "plain" > , < / span > < span class = "identifier" > VersionNumbers::from_text< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "string" > "8"< / span > < span class = "plain" > ),< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > I< / span > < span class = "string" > "vm_z8.png"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "Parchment"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "zblorb"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "16"< / span > < span class = "plain" > , < / span > < span class = "identifier" > FALSE< / span > < span class = "plain" > , < / span > < span class = "constant" > 15< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "zcode"< / span > < span class = "plain" > );< / span >
2020-03-23 23:42:00 +02:00
< span class = "functiontext" > TargetVMs::new< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "string" > "Z-Machine"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "z8"< / span > < span class = "plain" > , < / span > < span class = "identifier" > VersionNumbers::from_text< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "string" > "8"< / span > < span class = "plain" > ),< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > I< / span > < span class = "string" > "vm_z8.png"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "Parchment"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "zblorb"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "16d"< / span > < span class = "plain" > , < / span > < span class = "identifier" > TRUE< / span > < span class = "plain" > , < / span > < span class = "constant" > 15< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "zcode"< / span > < span class = "plain" > );< / span >
2020-02-27 13:18:25 +02:00
< span class = "comment" > hat tip: Andrew Plotkin, 2000< / span >
2020-03-23 23:42:00 +02:00
< span class = "functiontext" > TargetVMs::new< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "string" > "Glulx"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "ulx"< / span > < span class = "plain" > , < / span > < span class = "identifier" > VersionNumbers::from_text< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "string" > "3.1.2"< / span > < span class = "plain" > ),< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > I< / span > < span class = "string" > "vm_glulx.png"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "Quixe"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "gblorb"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "32"< / span > < span class = "plain" > , < / span > < span class = "identifier" > FALSE< / span > < span class = "plain" > , < / span > < span class = "constant" > 256< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "glulx"< / span > < span class = "plain" > );< / span >
2020-03-23 23:42:00 +02:00
< span class = "functiontext" > TargetVMs::new< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "string" > "Glulx"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "ulx"< / span > < span class = "plain" > , < / span > < span class = "identifier" > VersionNumbers::from_text< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "string" > "3.1.2"< / span > < span class = "plain" > ),< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > I< / span > < span class = "string" > "vm_glulx.png"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "Quixe"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "gblorb"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "32d"< / span > < span class = "plain" > , < / span > < span class = "identifier" > TRUE< / span > < span class = "plain" > , < / span > < span class = "constant" > 256< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "glulx"< / span > < span class = "plain" > );< / span >
2020-02-27 13:18:25 +02:00
< span class = "plain" > }< / span >
< span class = "reserved" > target_vm< / span > < span class = "plain" > *< / span > < span class = "functiontext" > TargetVMs::find< / span > < span class = "plain" > (< / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > ext< / span > < span class = "plain" > , < / span > < span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > debug< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > target_vm< / span > < span class = "plain" > *< / span > < span class = "identifier" > result< / span > < span class = "plain" > = < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > Str::len< / span > < span class = "plain" > (< / span > < span class = "identifier" > ext< / span > < span class = "plain" > ) == < / span > < span class = "constant" > 0< / span > < span class = "plain" > ) < / span > < span class = "identifier" > ext< / span > < span class = "plain" > = < / span > < span class = "identifier" > I< / span > < span class = "string" > "ulx"< / span > < span class = "plain" > ;< / span >
2020-02-27 13:18:25 +02:00
< span class = "identifier" > TEMPORARY_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > file_extension< / span > < span class = "plain" > );< / span >
< span class = "identifier" > Str::copy< / span > < span class = "plain" > (< / span > < span class = "identifier" > file_extension< / span > < span class = "plain" > , < / span > < span class = "identifier" > ext< / span > < span class = "plain" > );< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > Str::get_first_char< / span > < span class = "plain" > (< / span > < span class = "identifier" > file_extension< / span > < span class = "plain" > ) == < / span > < span class = "character" > '.'< / span > < span class = "plain" > ) < / span > < span class = "identifier" > Str::delete_first_character< / span > < span class = "plain" > (< / span > < span class = "identifier" > file_extension< / span > < span class = "plain" > );< / span >
< span class = "identifier" > LOOP_THROUGH_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > pos< / span > < span class = "plain" > , < / span > < span class = "identifier" > file_extension< / span > < span class = "plain" > )< / span >
< span class = "identifier" > Str::put< / span > < span class = "plain" > (< / span > < span class = "identifier" > pos< / span > < span class = "plain" > , < / span > < span class = "identifier" > Characters::tolower< / span > < span class = "plain" > (< / span > < span class = "identifier" > Str::get< / span > < span class = "plain" > (< / span > < span class = "identifier" > pos< / span > < span class = "plain" > )));< / span >
< span class = "reserved" > target_vm< / span > < span class = "plain" > *< / span > < span class = "identifier" > VM< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > LOOP_OVER< / span > < span class = "plain" > (< / span > < span class = "identifier" > VM< / span > < span class = "plain" > , < / span > < span class = "reserved" > target_vm< / span > < span class = "plain" > )< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > ((< / span > < span class = "identifier" > Str::eq_insensitive< / span > < span class = "plain" > (< / span > < span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > VM_unblorbed_extension< / span > < span class = "plain" > , < / span > < span class = "identifier" > ext< / span > < span class = "plain" > )) & & < / span >
< span class = "plain" > (< / span > < span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > with_debugging_enabled< / span > < span class = "plain" > == < / span > < span class = "identifier" > debug< / span > < span class = "plain" > ))< / span >
2020-02-27 13:18:25 +02:00
< span class = "identifier" > result< / span > < span class = "plain" > = < / span > < span class = "identifier" > VM< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > DISCARD_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > file_extension< / span > < span class = "plain" > );< / span >
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > result< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
2020-03-23 23:42:00 +02:00
< span class = "reserved" > target_vm< / span > < span class = "plain" > *< / span > < span class = "functiontext" > TargetVMs::find_in_family< / span > < span class = "plain" > (< / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > family< / span > < span class = "plain" > , < / span > < span class = "identifier" > semantic_version_number< / span > < span class = "plain" > < / span > < span class = "identifier" > V< / span > < span class = "plain" > , < / span > < span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > debug< / span > < span class = "plain" > ) {< / span >
2020-02-27 13:18:25 +02:00
< span class = "reserved" > target_vm< / span > < span class = "plain" > *< / span > < span class = "identifier" > VM< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > LOOP_OVER< / span > < span class = "plain" > (< / span > < span class = "identifier" > VM< / span > < span class = "plain" > , < / span > < span class = "reserved" > target_vm< / span > < span class = "plain" > )< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > ((< / span > < span class = "identifier" > Str::eq_insensitive< / span > < span class = "plain" > (< / span > < span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > family_name< / span > < span class = "plain" > , < / span > < span class = "identifier" > family< / span > < span class = "plain" > )) & & < / span >
< span class = "plain" > (< / span > < span class = "identifier" > VersionNumbers::eq< / span > < span class = "plain" > (< / span > < span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > version< / span > < span class = "plain" > , < / span > < span class = "identifier" > V< / span > < span class = "plain" > )) & & < / span >
< span class = "plain" > ((< / span > < span class = "identifier" > debug< / span > < span class = "plain" > == < / span > < span class = "identifier" > NOT_APPLICABLE< / span > < span class = "plain" > ) || (< / span > < span class = "identifier" > debug< / span > < span class = "plain" > == < / span > < span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > with_debugging_enabled< / span > < span class = "plain" > )))< / span >
2020-02-27 13:18:25 +02:00
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > VM< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "functiontext" > TargetVMs::is_16_bit< / span > < span class = "plain" > (< / span > < span class = "reserved" > target_vm< / span > < span class = "plain" > *< / span > < span class = "identifier" > VM< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > VM< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "no VM"< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "functiontext" > Architectures::is_16_bit< / span > < span class = "plain" > (< / span > < span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > architecture< / span > < span class = "plain" > );< / span >
2020-02-27 13:18:25 +02:00
< span class = "plain" > }< / span >
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "functiontext" > TargetVMs::debug_enabled< / span > < span class = "plain" > (< / span > < span class = "reserved" > target_vm< / span > < span class = "plain" > *< / span > < span class = "identifier" > VM< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > VM< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "no VM"< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "functiontext" > Architectures::debug_enabled< / span > < span class = "plain" > (< / span > < span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > architecture< / span > < span class = "plain" > );< / span >
2020-02-27 13:18:25 +02:00
< span class = "plain" > }< / span >
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "functiontext" > TargetVMs::supports_floating_point< / span > < span class = "plain" > (< / span > < span class = "reserved" > target_vm< / span > < span class = "plain" > *< / span > < span class = "identifier" > VM< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > VM< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "no VM"< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "identifier" > supports_floating_point< / span > < span class = "plain" > ;< / span >
2020-02-27 13:18:25 +02:00
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
< p class = "endnote" > The function TargetVMs::new appears nowhere else.< / p >
< p class = "endnote" > The function TargetVMs::write is used in 2/cmp (< a href = "2-cmp.html#SP1" > § 1< / a > ).< / p >
< p class = "endnote" > The function TargetVMs::create is used in 1/am (< a href = "1-am.html#SP3" > § 3< / a > ).< / p >
< p class = "endnote" > The function TargetVMs::find appears nowhere else.< / p >
< p class = "endnote" > The function TargetVMs::find_in_family appears nowhere else.< / p >
< p class = "endnote" > The function TargetVMs::is_16_bit is used in 2/cmp (< a href = "2-cmp.html#SP1" > § 1< / a > ).< / p >
< p class = "endnote" > The function TargetVMs::debug_enabled is used in 2/cmp (< a href = "2-cmp.html#SP1" > § 1< / a > ).< / p >
< p class = "endnote" > The function TargetVMs::supports_floating_point appears nowhere else.< / p >
< p class = "endnote" > The structure target_vm is accessed in 2/cmp and here.< / p >
< p class = "inwebparagraph" > < a id = "SP2" > < / a > < b > § 2. < / b > The limits are different on each platform. On Z, the maximum is fixed
at 15, but Glulx allows it to be set with an I6 memory setting.
< / p >
< pre class = "display" >
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "functiontext" > TargetVMs::allow_this_many_locals< / span > < span class = "plain" > (< / span > < span class = "reserved" > target_vm< / span > < span class = "plain" > *< / span > < span class = "identifier" > VM< / span > < span class = "plain" > , < / span > < span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > N< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > VM< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "no VM"< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > ((< / span > < span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > max_locals< / span > < span class = "plain" > > = < / span > < span class = "constant" > 0< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > max_locals< / span > < span class = "plain" > < < / span > < span class = "identifier" > N< / span > < span class = "plain" > )) < / span > < span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > FALSE< / span > < span class = "plain" > ;< / span >
2020-02-27 13:18:25 +02:00
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > TRUE< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "functiontext" > TargetVMs::allow_MAX_LOCAL_VARIABLES< / span > < span class = "plain" > (< / span > < span class = "reserved" > target_vm< / span > < span class = "plain" > *< / span > < span class = "identifier" > VM< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > VM< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "no VM"< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "element" > max_locals< / span > < span class = "plain" > > < / span > < span class = "constant" > 15< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > TRUE< / span > < span class = "plain" > ;< / span >
2020-02-27 13:18:25 +02:00
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > FALSE< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
< p class = "endnote" > The function TargetVMs::allow_this_many_locals appears nowhere else.< / p >
< p class = "endnote" > The function TargetVMs::allow_MAX_LOCAL_VARIABLES appears nowhere else.< / p >
< p class = "inwebparagraph" > < a id = "SP3" > < / a > < b > § 3. < / b > When releasing a blorbed story file, the file extension depends on the
story file wrapped inside. (This is a dubious idea, in the opinion of
the author of Inform — should not blorb be one unified wrapper? — but
interpreter writers disagree.)
< / p >
< pre class = "display" >
< span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "functiontext" > TargetVMs::get_unblorbed_extension< / span > < span class = "plain" > (< / span > < span class = "reserved" > target_vm< / span > < span class = "plain" > *< / span > < span class = "identifier" > VM< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > VM< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "no VM"< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "identifier" > VM_unblorbed_extension< / span > < span class = "plain" > ;< / span >
2020-02-27 13:18:25 +02:00
< span class = "plain" > }< / span >
< span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "functiontext" > TargetVMs::get_blorbed_extension< / span > < span class = "plain" > (< / span > < span class = "reserved" > target_vm< / span > < span class = "plain" > *< / span > < span class = "identifier" > VM< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > VM< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "no VM"< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "identifier" > VM_blorbed_extension< / span > < span class = "plain" > ;< / span >
2020-02-27 13:18:25 +02:00
< span class = "plain" > }< / span >
< span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "functiontext" > TargetVMs::get_iFiction_format< / span > < span class = "plain" > (< / span > < span class = "reserved" > target_vm< / span > < span class = "plain" > *< / span > < span class = "identifier" > VM< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > VM< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "no VM"< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "identifier" > iFiction_format_name< / span > < span class = "plain" > ;< / span >
2020-02-27 13:18:25 +02:00
< span class = "plain" > }< / span >
< span class = "reserved" > inter_architecture< / span > < span class = "plain" > *< / span > < span class = "functiontext" > TargetVMs::get_architecture< / span > < span class = "plain" > (< / span > < span class = "reserved" > target_vm< / span > < span class = "plain" > *< / span > < span class = "identifier" > VM< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > VM< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "no VM"< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "identifier" > architecture< / span > < span class = "plain" > ;< / span >
2020-02-27 13:18:25 +02:00
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
< p class = "endnote" > The function TargetVMs::get_unblorbed_extension appears nowhere else.< / p >
< p class = "endnote" > The function TargetVMs::get_blorbed_extension appears nowhere else.< / p >
< p class = "endnote" > The function TargetVMs::get_iFiction_format appears nowhere else.< / p >
< p class = "endnote" > The function TargetVMs::get_architecture appears nowhere else.< / p >
< p class = "inwebparagraph" > < a id = "SP4" > < / a > < b > § 4. < / b > Different VMs have different in-browser interpreters, which means that
Inblorb needs to be given different release instructions for them. If the
user doesn't specify any particular interpreter, he gets:
< / p >
< pre class = "display" >
< span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "functiontext" > TargetVMs::get_default_interpreter< / span > < span class = "plain" > (< / span > < span class = "reserved" > target_vm< / span > < span class = "plain" > *< / span > < span class = "identifier" > VM< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > VM< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "no VM"< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > VM< / span > < span class = "plain" > -> < / span > < span class = "identifier" > default_browser_interpreter< / span > < span class = "plain" > ;< / span >
2020-02-27 13:18:25 +02:00
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
< p class = "endnote" > The function TargetVMs::get_default_interpreter appears nowhere else.< / p >
< hr class = "tocbar" >
< ul class = "toc" > < li > < a href = "2-arc.html" > Back to 'Architectures'< / a > < / li > < li > < a href = "2-cmp.html" > Continue with 'Compatibility'< / a > < / li > < / ul > < hr class = "tocbar" >
<!-- End of weave -->
2020-03-19 02:11:25 +02:00
< / main >
2020-02-27 13:18:25 +02:00
< / body >
< / html >