<?xml version="1.0" encoding="iso-8859-1"?>
<!DOCTYPE html
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
<head>
<title>Class: SuperStruct</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<meta http-equiv="Content-Script-Type" content="text/javascript" />
<link rel="stylesheet" href=".././rdoc-style.css" type="text/css" media="screen" />
<script type="text/javascript">
// <![CDATA[
function popupCode( url ) {
window.open(url, "Code", "resizable=yes,scrollbars=yes,toolbar=no,status=no,height=150,width=400")
}
function toggleCode( id ) {
if ( document.getElementById )
elem = document.getElementById( id );
else if ( document.all )
elem = eval( "document.all." + id );
else
return false;
elemStyle = elem.style;
if ( elemStyle.display != "block" ) {
elemStyle.display = "block"
} else {
elemStyle.display = "none"
}
return true;
}
// Make codeblocks hidden by default
document.writeln( "<style type=\"text/css\">div.method-source-code { display: none }</style>" )
// ]]>
</script>
</head>
<body>
<div id="classHeader">
<table class="header-table">
<tr class="top-aligned-row">
<td><strong>Class</strong></td>
<td class="class-name-in-header">SuperStruct</td>
</tr>
<tr class="top-aligned-row">
<td><strong>In:</strong></td>
<td>
<a href="../files/lib/carat/sstruct_rb.html">
lib/carat/sstruct.rb
</a>
<br />
</td>
</tr>
<tr class="top-aligned-row">
<td><strong>Parent:</strong></td>
<td>
<a href="Object.html">
Object
</a>
</td>
</tr>
</table>
</div>
<!-- banner header -->
<div id="bodyContent">
<div id="contextContent">
<div id="description">
<h1><a href="SuperStruct.html">SuperStruct</a></h1>
<p>
This is an easy way to create <a href="Struct.html">Struct</a>-like
classes; it converts easily between hashes and arrays, and it allows
OpenStruct-like dynamic naming of members.
</p>
<p>
Unlike <a href="Struct.html">Struct</a>, it creates a "real"
class, and it has real instance variables with predictable names.
</p>
<p>
A basic limitation is that the hash keys must be legal method names (unless
used with send()).
</p>
<p>
Basically, ss["alpha"], ss[:alpha], ss[0], and ss.alpha all mean
the same.
</p>
<h2>Usage</h2>
<h2>Author(s)</h2>
<ul>
<li>Hal Fulton
</li>
</ul>
<h2>Legal</h2>
<p>
Ruby License (see incuded file)
</p>
</div>
</div>
<div id="method-list">
<h3 class="section-bar">Methods</h3>
<div class="name-list">
<a href="#M000162">new</a>
<a href="#M000163">open</a>
</div>
</div>
</div>
<!-- if includes -->
<div id="section">
<!-- if method_list -->
<div id="methods">
<h3 class="section-bar">Public Class methods</h3>
<div id="method-M000162" class="method-detail">
<a name="M000162"></a>
<div class="method-heading">
<a href="#M000162" class="method-signature">
<span class="method-name">new</span><span class="method-args">(*args)</span>
</a>
</div>
<div class="method-description">
<p><a class="source-toggle" href="#"
onclick="toggleCode('M000162-source');return false;">[Source]</a></p>
<div class="method-source-code" id="M000162-source">
<pre>
<span class="ruby-comment cmt"># File lib/carat/sstruct.rb, line 33</span>
<span class="ruby-keyword kw">def</span> <span class="ruby-constant">SuperStruct</span>.<span class="ruby-identifier">new</span>(<span class="ruby-operator">*</span><span class="ruby-identifier">args</span>)
<span class="ruby-ivar">@table</span> = []
<span class="ruby-ivar">@setsyms</span> = [] <span class="ruby-comment cmt"># Setter symbols</span>
<span class="ruby-identifier">klass</span> = <span class="ruby-constant">Class</span>.<span class="ruby-identifier">new</span>
<span class="ruby-keyword kw">if</span> (<span class="ruby-identifier">args</span>.<span class="ruby-identifier">size</span> <span class="ruby-operator">==</span> <span class="ruby-value">1</span>) <span class="ruby-operator">&&</span> (<span class="ruby-identifier">args</span>[<span class="ruby-value">0</span>].<span class="ruby-identifier">is_a?</span> <span class="ruby-constant">Array</span>)
<span class="ruby-identifier">args</span> = <span class="ruby-identifier">args</span>[<span class="ruby-value">0</span>]
<span class="ruby-keyword kw">end</span>
<span class="ruby-identifier">strs</span> = <span class="ruby-identifier">args</span>.<span class="ruby-identifier">map</span> {<span class="ruby-operator">|</span><span class="ruby-identifier">x</span><span class="ruby-operator">|</span> <span class="ruby-identifier">x</span>.<span class="ruby-identifier">to_s</span> }
<span class="ruby-identifier">args</span>.<span class="ruby-identifier">each_with_index</span> <span class="ruby-keyword kw">do</span> <span class="ruby-operator">|</span><span class="ruby-identifier">k</span>,<span class="ruby-identifier">i</span><span class="ruby-operator">|</span>
<span class="ruby-keyword kw">case</span>
<span class="ruby-keyword kw">when</span> (<span class="ruby-operator">!</span> [<span class="ruby-constant">String</span>,<span class="ruby-constant">Symbol</span>].<span class="ruby-identifier">include?</span> <span class="ruby-identifier">k</span>.<span class="ruby-identifier">class</span>)
<span class="ruby-identifier">raise</span> <span class="ruby-constant">ArgumentError</span>, <span class="ruby-value str">"Need a String or Symbol"</span>
<span class="ruby-keyword kw">when</span> (<span class="ruby-identifier">strs</span>[<span class="ruby-identifier">i</span>] <span class="ruby-operator">!~</span> <span class="ruby-regexp re">/[_a-zA-Z][_a-zA-Z0-9]*/</span>)
<span class="ruby-identifier">raise</span> <span class="ruby-constant">ArgumentError</span>, <span class="ruby-value str">"Illegal character"</span>
<span class="ruby-keyword kw">end</span>
<span class="ruby-identifier">k</span> = <span class="ruby-identifier">k</span>.<span class="ruby-identifier">intern</span> <span class="ruby-keyword kw">if</span> <span class="ruby-identifier">k</span>.<span class="ruby-identifier">is_a?</span> <span class="ruby-constant">String</span>
<span class="ruby-ivar">@table</span> <span class="ruby-operator"><<</span> <span class="ruby-identifier">k</span>
<span class="ruby-ivar">@setsyms</span> <span class="ruby-operator"><<</span> (<span class="ruby-identifier">k</span>.<span class="ruby-identifier">to_s</span> <span class="ruby-operator">+</span> <span class="ruby-value str">"="</span>).<span class="ruby-identifier">intern</span>
<span class="ruby-identifier">klass</span>.<span class="ruby-identifier">instance_eval</span> { <span class="ruby-identifier">attr_accessor</span> <span class="ruby-identifier">k</span> }
<span class="ruby-keyword kw">end</span>
<span class="ruby-identifier">setsyms</span> = <span class="ruby-ivar">@setsyms</span>
<span class="ruby-identifier">table</span> = <span class="ruby-ivar">@table</span>
<span class="ruby-identifier">vals</span> = <span class="ruby-ivar">@vals</span>
<span class="ruby-identifier">klass</span>.<span class="ruby-identifier">class_eval</span> <span class="ruby-keyword kw">do</span>
<span class="ruby-identifier">attr_reader</span> <span class="ruby-identifier">:singleton</span>
<span class="ruby-identifier">define_method</span>(<span class="ruby-identifier">:initialize</span>) <span class="ruby-keyword kw">do</span> <span class="ruby-operator">|</span><span class="ruby-operator">*</span><span class="ruby-identifier">vals</span><span class="ruby-operator">|</span>
<span class="ruby-identifier">n</span> = <span class="ruby-identifier">vals</span>.<span class="ruby-identifier">size</span>
<span class="ruby-identifier">m</span> = <span class="ruby-identifier">table</span>.<span class="ruby-identifier">size</span>
<span class="ruby-keyword kw">case</span>
<span class="ruby-keyword kw">when</span> <span class="ruby-identifier">n</span> <span class="ruby-operator"><</span> <span class="ruby-identifier">m</span>
<span class="ruby-comment cmt"># raise ArgumentError, "Too few arguments (#{n} for #{m})"</span>
<span class="ruby-comment cmt"># Never mind... extra variables will just be nil</span>
<span class="ruby-keyword kw">when</span> <span class="ruby-identifier">n</span> <span class="ruby-operator">></span> <span class="ruby-identifier">m</span>
<span class="ruby-identifier">raise</span> <span class="ruby-constant">ArgumentError</span>, <span class="ruby-node">"Too many arguments (#{n} for #{m})"</span>
<span class="ruby-keyword kw">end</span>
<span class="ruby-identifier">setsyms</span>.<span class="ruby-identifier">each_with_index</span> <span class="ruby-keyword kw">do</span> <span class="ruby-operator">|</span><span class="ruby-identifier">var</span>,<span class="ruby-identifier">i</span><span class="ruby-operator">|</span>
<span class="ruby-keyword kw">self</span>.<span class="ruby-identifier">send</span>(<span class="ruby-identifier">var</span>,<span class="ruby-identifier">vals</span>[<span class="ruby-identifier">i</span>])
<span class="ruby-keyword kw">end</span>
<span class="ruby-keyword kw">end</span>
<span class="ruby-identifier">define_method</span>(<span class="ruby-identifier">:pretty_print</span>) <span class="ruby-keyword kw">do</span> <span class="ruby-operator">|</span><span class="ruby-identifier">q</span><span class="ruby-operator">|</span> <span class="ruby-comment cmt"># pp.rb support</span>
<span class="ruby-identifier">q</span>.<span class="ruby-identifier">object_group</span>(<span class="ruby-keyword kw">self</span>) <span class="ruby-keyword kw">do</span>
<span class="ruby-identifier">q</span>.<span class="ruby-identifier">seplist</span>(<span class="ruby-keyword kw">self</span>.<span class="ruby-identifier">members</span>, <span class="ruby-identifier">proc</span> { <span class="ruby-identifier">q</span>.<span class="ruby-identifier">text</span> <span class="ruby-value str">","</span> }) <span class="ruby-keyword kw">do</span> <span class="ruby-operator">|</span><span class="ruby-identifier">member</span><span class="ruby-operator">|</span>
<span class="ruby-comment cmt"># self.members.each do |member|</span>
<span class="ruby-comment cmt"># q.text "," # unless q.first?</span>
<span class="ruby-identifier">q</span>.<span class="ruby-identifier">breakable</span>
<span class="ruby-identifier">q</span>.<span class="ruby-identifier">text</span> <span class="ruby-identifier">member</span>.<span class="ruby-identifier">to_s</span>
<span class="ruby-identifier">q</span>.<span class="ruby-identifier">text</span> <span class="ruby-value str">'='</span>
<span class="ruby-identifier">q</span>.<span class="ruby-identifier">group</span>(<span class="ruby-value">1</span>) <span class="ruby-keyword kw">do</span>
<span class="ruby-identifier">q</span>.<span class="ruby-identifier">breakable</span> <span class="ruby-value str">''</span>
<span class="ruby-identifier">q</span>.<span class="ruby-identifier">pp</span> <span class="ruby-keyword kw">self</span>[<span class="ruby-identifier">member</span>]
<span class="ruby-keyword kw">end</span>
<span class="ruby-keyword kw">end</span>
<span class="ruby-keyword kw">end</span>
<span class="ruby-keyword kw">end</span>
<span class="ruby-identifier">define_method</span>(<span class="ruby-identifier">:inspect</span>) <span class="ruby-keyword kw">do</span>
<span class="ruby-identifier">str</span> = <span class="ruby-node">"#<#{self.class}:"</span>
<span class="ruby-identifier">table</span>.<span class="ruby-identifier">each</span> {<span class="ruby-operator">|</span><span class="ruby-identifier">item</span><span class="ruby-operator">|</span> <span class="ruby-identifier">str</span> <span class="ruby-operator"><<</span> <span class="ruby-node">" #{item}=#{self.send(item)}"</span> }
<span class="ruby-identifier">str</span> <span class="ruby-operator">+</span> <span class="ruby-value str">">"</span>
<span class="ruby-keyword kw">end</span>
<span class="ruby-identifier">define_method</span>(<span class="ruby-identifier">:[]</span>) <span class="ruby-keyword kw">do</span> <span class="ruby-operator">|</span><span class="ruby-operator">*</span><span class="ruby-identifier">index</span><span class="ruby-operator">|</span>
<span class="ruby-keyword kw">case</span> <span class="ruby-identifier">index</span>.<span class="ruby-identifier">map</span> {<span class="ruby-operator">|</span><span class="ruby-identifier">x</span><span class="ruby-operator">|</span> <span class="ruby-identifier">x</span>.<span class="ruby-identifier">class</span> }
<span class="ruby-keyword kw">when</span> [<span class="ruby-constant">Fixnum</span>]
<span class="ruby-keyword kw">self</span>.<span class="ruby-identifier">send</span>(<span class="ruby-identifier">table</span>[<span class="ruby-operator">*</span><span class="ruby-identifier">index</span>])
<span class="ruby-keyword kw">when</span> [<span class="ruby-constant">Fixnum</span>,<span class="ruby-constant">Fixnum</span>], [<span class="ruby-constant">Range</span>]
<span class="ruby-identifier">table</span>[<span class="ruby-operator">*</span><span class="ruby-identifier">index</span>].<span class="ruby-identifier">map</span> {<span class="ruby-operator">|</span><span class="ruby-identifier">x</span><span class="ruby-operator">|</span> <span class="ruby-keyword kw">self</span>.<span class="ruby-identifier">send</span>(<span class="ruby-identifier">x</span>)}
<span class="ruby-keyword kw">when</span> [<span class="ruby-constant">String</span>]
<span class="ruby-keyword kw">self</span>.<span class="ruby-identifier">send</span>(<span class="ruby-identifier">index</span>[<span class="ruby-value">0</span>].<span class="ruby-identifier">intern</span>)
<span class="ruby-keyword kw">when</span> [<span class="ruby-constant">Symbol</span>]
<span class="ruby-keyword kw">self</span>.<span class="ruby-identifier">send</span>(<span class="ruby-identifier">index</span>[<span class="ruby-value">0</span>])
<span class="ruby-keyword kw">else</span>
<span class="ruby-identifier">raise</span> <span class="ruby-constant">ArgumentError</span>,<span class="ruby-value str">"Illegal index"</span>
<span class="ruby-keyword kw">end</span>
<span class="ruby-keyword kw">end</span>
<span class="ruby-identifier">define_method</span>(<span class="ruby-identifier">:[]=</span>) <span class="ruby-keyword kw">do</span> <span class="ruby-operator">|</span><span class="ruby-operator">*</span><span class="ruby-identifier">index</span><span class="ruby-operator">|</span>
<span class="ruby-identifier">value</span> = <span class="ruby-identifier">index</span>[<span class="ruby-value">-1</span>]
<span class="ruby-identifier">index</span> = <span class="ruby-identifier">index</span>[<span class="ruby-value">0</span><span class="ruby-operator">..</span><span class="ruby-value">-2</span>]
<span class="ruby-keyword kw">case</span> <span class="ruby-identifier">index</span>.<span class="ruby-identifier">map</span> {<span class="ruby-operator">|</span><span class="ruby-identifier">x</span><span class="ruby-operator">|</span> <span class="ruby-identifier">x</span>.<span class="ruby-identifier">class</span> }
<span class="ruby-keyword kw">when</span> [<span class="ruby-constant">Fixnum</span>]
<span class="ruby-keyword kw">self</span>.<span class="ruby-identifier">send</span>(<span class="ruby-identifier">table</span>[<span class="ruby-operator">*</span><span class="ruby-identifier">index</span>])
<span class="ruby-keyword kw">when</span> [<span class="ruby-constant">Fixnum</span>,<span class="ruby-constant">Fixnum</span>], [<span class="ruby-constant">Range</span>]
<span class="ruby-identifier">setsyms</span>[<span class="ruby-operator">*</span><span class="ruby-identifier">index</span>].<span class="ruby-identifier">map</span> {<span class="ruby-operator">|</span><span class="ruby-identifier">x</span><span class="ruby-operator">|</span> <span class="ruby-keyword kw">self</span>.<span class="ruby-identifier">send</span>(<span class="ruby-identifier">x</span>,<span class="ruby-identifier">value</span>) }
<span class="ruby-keyword kw">when</span> [<span class="ruby-constant">String</span>]
<span class="ruby-keyword kw">self</span>.<span class="ruby-identifier">send</span>(<span class="ruby-identifier">index</span>[<span class="ruby-value">0</span>].<span class="ruby-identifier">intern</span>,<span class="ruby-identifier">value</span>)
<span class="ruby-keyword kw">when</span> [<span class="ruby-constant">Symbol</span>]
<span class="ruby-keyword kw">self</span>.<span class="ruby-identifier">send</span>(<span class="ruby-identifier">index</span>[<span class="ruby-value">0</span>],<span class="ruby-identifier">value</span>)
<span class="ruby-keyword kw">else</span>
<span class="ruby-identifier">raise</span> <span class="ruby-constant">ArgumentError</span>,<span class="ruby-value str">"Illegal index"</span>
<span class="ruby-keyword kw">end</span>
<span class="ruby-keyword kw">end</span>
<span class="ruby-identifier">define_method</span>(<span class="ruby-identifier">:to_a</span>) { <span class="ruby-identifier">table</span>.<span class="ruby-identifier">map</span> {<span class="ruby-operator">|</span><span class="ruby-identifier">x</span><span class="ruby-operator">|</span> <span class="ruby-identifier">eval</span>(<span class="ruby-value str">"@"</span><span class="ruby-operator">+</span><span class="ruby-identifier">x</span>.<span class="ruby-identifier">to_s</span>) } }
<span class="ruby-identifier">define_method</span>(<span class="ruby-identifier">:to_ary</span>) { <span class="ruby-identifier">to_a</span> }
<span class="ruby-identifier">define_method</span>(<span class="ruby-identifier">:members</span>) { <span class="ruby-identifier">table</span>.<span class="ruby-identifier">map</span> {<span class="ruby-operator">|</span><span class="ruby-identifier">x</span><span class="ruby-operator">|</span> <span class="ruby-identifier">x</span>.<span class="ruby-identifier">to_s</span> } }
<span class="ruby-identifier">define_method</span>(<span class="ruby-identifier">:to_struct</span>) <span class="ruby-keyword kw">do</span>
<span class="ruby-identifier">mems</span> = <span class="ruby-identifier">table</span>
<span class="ruby-constant">Struct</span>.<span class="ruby-identifier">new</span>(<span class="ruby-value str">"TEMP"</span>,<span class="ruby-operator">*</span><span class="ruby-identifier">mems</span>)
<span class="ruby-comment cmt"># Struct::TEMP.new(*vals) # Why doesn't this work??</span>
<span class="ruby-identifier">data</span> = <span class="ruby-identifier">mems</span>.<span class="ruby-identifier">map</span> {<span class="ruby-operator">|</span><span class="ruby-identifier">x</span><span class="ruby-operator">|</span> <span class="ruby-keyword kw">self</span>.<span class="ruby-identifier">send</span>(<span class="ruby-identifier">x</span>) }
<span class="ruby-constant">Struct</span><span class="ruby-operator">::</span><span class="ruby-constant">TEMP</span>.<span class="ruby-identifier">new</span>(<span class="ruby-operator">*</span><span class="ruby-identifier">data</span>)
<span class="ruby-keyword kw">end</span>
<span class="ruby-identifier">define_method</span>(<span class="ruby-identifier">:to_hash</span>) <span class="ruby-keyword kw">do</span>
<span class="ruby-identifier">hash</span> = {}
<span class="ruby-identifier">table</span>.<span class="ruby-identifier">each</span> <span class="ruby-keyword kw">do</span> <span class="ruby-operator">|</span><span class="ruby-identifier">mem</span><span class="ruby-operator">|</span>
<span class="ruby-identifier">mem</span> = <span class="ruby-identifier">mem</span>.<span class="ruby-identifier">to_s</span>
<span class="ruby-identifier">hash</span>.<span class="ruby-identifier">update</span>(<span class="ruby-identifier">mem</span> =<span class="ruby-operator">></span> <span class="ruby-keyword kw">self</span>.<span class="ruby-identifier">send</span>(<span class="ruby-identifier">mem</span>))
<span class="ruby-keyword kw">end</span>
<span class="ruby-identifier">hash</span>
<span class="ruby-keyword kw">end</span>
<span class="ruby-identifier">define_method</span>(<span class="ruby-identifier">:set</span>) {<span class="ruby-operator">|</span><span class="ruby-identifier">h</span><span class="ruby-operator">|</span> <span class="ruby-identifier">h</span>.<span class="ruby-identifier">each_pair</span> {<span class="ruby-operator">|</span><span class="ruby-identifier">k</span>,<span class="ruby-identifier">v</span><span class="ruby-operator">|</span> <span class="ruby-identifier">send</span>(<span class="ruby-identifier">k</span>.<span class="ruby-identifier">to_s</span><span class="ruby-operator">+</span><span class="ruby-value str">"="</span>,<span class="ruby-identifier">v</span>) } }
<span class="ruby-comment cmt"># Class methods...</span>
<span class="ruby-ivar">@singleton</span> = <span class="ruby-keyword kw">class</span> <span class="ruby-operator"><<</span> <span class="ruby-keyword kw">self</span>
<span class="ruby-keyword kw">self</span>
<span class="ruby-keyword kw">end</span>
<span class="ruby-ivar">@singleton</span>.<span class="ruby-identifier">instance_eval</span> <span class="ruby-keyword kw">do</span>
<span class="ruby-identifier">define_method</span>(<span class="ruby-identifier">:members</span>) <span class="ruby-keyword kw">do</span>
<span class="ruby-identifier">table</span>.<span class="ruby-identifier">map</span> {<span class="ruby-operator">|</span><span class="ruby-identifier">x</span><span class="ruby-operator">|</span> <span class="ruby-identifier">x</span>.<span class="ruby-identifier">to_s</span> }
<span class="ruby-keyword kw">end</span>
<span class="ruby-identifier">me</span> = <span class="ruby-keyword kw">self</span>
<span class="ruby-identifier">define_method</span>(<span class="ruby-identifier">:attr_tester</span>) <span class="ruby-keyword kw">do</span> <span class="ruby-operator">|</span><span class="ruby-operator">*</span><span class="ruby-identifier">syms</span><span class="ruby-operator">|</span>
<span class="ruby-identifier">syms</span>.<span class="ruby-identifier">each</span> {<span class="ruby-operator">|</span><span class="ruby-identifier">sym</span><span class="ruby-operator">|</span> <span class="ruby-identifier">alias_method</span>(<span class="ruby-identifier">sym</span>.<span class="ruby-identifier">to_s</span><span class="ruby-operator">+</span><span class="ruby-value str">"?"</span>,<span class="ruby-identifier">sym</span>) }
<span class="ruby-keyword kw">end</span>
<span class="ruby-keyword kw">end</span>
<span class="ruby-keyword kw">end</span>
<span class="ruby-identifier">klass</span>
<span class="ruby-keyword kw">end</span>
</pre>
</div>
</div>
</div>
<div id="method-M000163" class="method-detail">
<a name="M000163"></a>
<div class="method-heading">
<a href="#M000163" class="method-signature">
<span class="method-name">open</span><span class="method-args">(*args)</span>
</a>
</div>
<div class="method-description">
<p><a class="source-toggle" href="#"
onclick="toggleCode('M000163-source');return false;">[Source]</a></p>
<div class="method-source-code" id="M000163-source">
<pre>
<span class="ruby-comment cmt"># File lib/carat/sstruct.rb, line 164</span>
<span class="ruby-keyword kw">def</span> <span class="ruby-constant">SuperStruct</span>.<span class="ruby-identifier">open</span>(<span class="ruby-operator">*</span><span class="ruby-identifier">args</span>)
<span class="ruby-identifier">klass</span> = <span class="ruby-constant">SuperStruct</span>.<span class="ruby-identifier">new</span>(<span class="ruby-operator">*</span><span class="ruby-identifier">args</span>)
<span class="ruby-identifier">table</span> = <span class="ruby-ivar">@table</span>
<span class="ruby-identifier">setsyms</span> = <span class="ruby-ivar">@setsyms</span>
<span class="ruby-identifier">table</span> = <span class="ruby-ivar">@table</span>
<span class="ruby-identifier">klass</span>.<span class="ruby-identifier">class_eval</span> <span class="ruby-keyword kw">do</span>
<span class="ruby-identifier">define_method</span>(<span class="ruby-identifier">:method_missing</span>) <span class="ruby-keyword kw">do</span> <span class="ruby-operator">|</span><span class="ruby-identifier">meth</span>, <span class="ruby-operator">*</span><span class="ruby-identifier">args</span><span class="ruby-operator">|</span>
<span class="ruby-identifier">mname</span> = <span class="ruby-identifier">meth</span>.<span class="ruby-identifier">id2name</span>
<span class="ruby-keyword kw">if</span> <span class="ruby-identifier">mname</span> <span class="ruby-operator">=~</span> <span class="ruby-regexp re">/=$/</span>
<span class="ruby-identifier">getter</span> = <span class="ruby-identifier">mname</span>.<span class="ruby-identifier">chop</span>
<span class="ruby-identifier">setter</span> = <span class="ruby-identifier">mname</span>
<span class="ruby-keyword kw">elsif</span> <span class="ruby-identifier">mname</span> <span class="ruby-operator">=~</span> <span class="ruby-regexp re">/\?$/</span>
<span class="ruby-identifier">raise</span> <span class="ruby-constant">NoMethodError</span> <span class="ruby-comment cmt"># ?-methods are not created automatically</span>
<span class="ruby-keyword kw">else</span>
<span class="ruby-identifier">getter</span> = <span class="ruby-identifier">mname</span>
<span class="ruby-identifier">setter</span> = <span class="ruby-identifier">mname</span> <span class="ruby-operator">+</span> <span class="ruby-value str">"="</span>
<span class="ruby-keyword kw">end</span>
<span class="ruby-identifier">gsym</span> = <span class="ruby-identifier">getter</span>.<span class="ruby-identifier">intern</span>
<span class="ruby-identifier">ssym</span> = <span class="ruby-identifier">setter</span>.<span class="ruby-identifier">intern</span>
<span class="ruby-identifier">ivar</span> = <span class="ruby-value str">"@"</span> <span class="ruby-operator">+</span> <span class="ruby-identifier">getter</span>
<span class="ruby-identifier">setsyms</span> <span class="ruby-operator"><<</span> <span class="ruby-identifier">setter</span>
<span class="ruby-identifier">table</span> <span class="ruby-operator"><<</span> <span class="ruby-identifier">getter</span>
<span class="ruby-identifier">len</span> = <span class="ruby-identifier">args</span>.<span class="ruby-identifier">length</span>
<span class="ruby-keyword kw">if</span> <span class="ruby-identifier">mname</span> <span class="ruby-operator">==</span> <span class="ruby-identifier">getter</span>
<span class="ruby-identifier">klass</span>.<span class="ruby-identifier">class_eval</span> <span class="ruby-keyword kw">do</span> <span class="ruby-comment cmt"># getter</span>
<span class="ruby-identifier">define_method</span>(<span class="ruby-identifier">getter</span>) <span class="ruby-keyword kw">do</span>
<span class="ruby-identifier">instance_variable_get</span>(<span class="ruby-identifier">ivar</span>)
<span class="ruby-keyword kw">end</span>
<span class="ruby-keyword kw">end</span>
<span class="ruby-keyword kw">else</span>
<span class="ruby-identifier">klass</span>.<span class="ruby-identifier">class_eval</span> <span class="ruby-keyword kw">do</span> <span class="ruby-comment cmt"># setter</span>
<span class="ruby-identifier">define_method</span>(<span class="ruby-identifier">setter</span>) <span class="ruby-keyword kw">do</span> <span class="ruby-operator">|</span><span class="ruby-operator">*</span><span class="ruby-identifier">args</span><span class="ruby-operator">|</span>
<span class="ruby-keyword kw">if</span> <span class="ruby-identifier">len</span> <span class="ruby-operator">!=</span> <span class="ruby-value">1</span>
<span class="ruby-identifier">raise</span> <span class="ruby-constant">ArgumentError</span>, <span class="ruby-node">"Wrong # of arguments (#{len} for 1)"</span>,
<span class="ruby-identifier">caller</span>(<span class="ruby-value">1</span>)
<span class="ruby-keyword kw">end</span>
<span class="ruby-identifier">instance_variable_set</span>(<span class="ruby-identifier">ivar</span>,<span class="ruby-identifier">args</span>[<span class="ruby-value">0</span>])
<span class="ruby-identifier">instance_variable_get</span>(<span class="ruby-identifier">ivar</span>)
<span class="ruby-keyword kw">end</span>
<span class="ruby-keyword kw">end</span>
<span class="ruby-keyword kw">end</span>
<span class="ruby-keyword kw">if</span> <span class="ruby-identifier">mname</span> <span class="ruby-operator">==</span> <span class="ruby-identifier">setter</span>
<span class="ruby-keyword kw">self</span>.<span class="ruby-identifier">send</span>(<span class="ruby-identifier">setter</span>,<span class="ruby-operator">*</span><span class="ruby-identifier">args</span>)
<span class="ruby-keyword kw">else</span>
<span class="ruby-keyword kw">if</span> <span class="ruby-identifier">len</span> <span class="ruby-operator">==</span> <span class="ruby-value">0</span>
<span class="ruby-keyword kw">self</span>.<span class="ruby-identifier">send</span>(<span class="ruby-identifier">getter</span>)
<span class="ruby-keyword kw">else</span>
<span class="ruby-identifier">raise</span> <span class="ruby-constant">NoMethodError</span>, <span class="ruby-node">"Undefined method '#{mname}' for #{self}"</span>,
<span class="ruby-identifier">caller</span>(<span class="ruby-value">1</span>)
<span class="ruby-keyword kw">end</span>
<span class="ruby-keyword kw">end</span>
<span class="ruby-keyword kw">end</span>
<span class="ruby-keyword kw">end</span>
<span class="ruby-identifier">klass</span>
<span class="ruby-keyword kw">end</span>
</pre>
</div>
</div>
</div>
</div>
</div>
<div id="validator-badges">
<p><small><a href="http://validator.w3.org/check/referer">[Validate]</a></small></p>
</div>
</body>
</html>