[#5999] Re: Custom installation (1.6.1) — ts <decoux@...>
>>>>> "D" == David Suarez de Lis <excalibor@demasiado.com> writes:
5 messages
2000/11/02
[#6019] Time.local bug? — hal9000@...
Please tell me this is a bug, not a feature.
7 messages
2000/11/02
[#6028] Ref.: Re: Time.local bug? — David Suarez de Lis <excalibor@...>
Hi,
4 messages
2000/11/03
[#6042] Re: Time.local bug? — ts <decoux@...>
>>>>> "H" == Hugh Sasse Staff Elec Eng <hgs@dmu.ac.uk> writes:
9 messages
2000/11/03
[#6074] Re: Cygwin conflicts — "Conrad Schneiker/Austin/Contr/IBM" <schneik@...>
Conrad Schneiker wrote:
4 messages
2000/11/06
[#6078] Programming Ruby ranking — Aleksi Niemel<aleksi.niemela@...>
Just a small note how the Ruby book sells:
4 messages
2000/11/06
[#6083] ANN: Single step Ruby installation for Windows — Dave Thomas <Dave@...>
1 message
2000/11/06
[#6092] Re: detect:ifNone: in Ruby — Aleksi Niemel<aleksi.niemela@...>
> I like it. You can also mess around with the built in classes to get
6 messages
2000/11/07
[#6097] Re: detect:ifNone: in Ruby — Aleksi Niemel<aleksi.niemela@...>
matz queries:
9 messages
2000/11/07
[#6102] What would a Ruby browser look like? — Dave Thomas <Dave@...>
6 messages
2000/11/07
[#6106] Re: What would a Ruby browser look like? — "Conrad Schneiker/Austin/Contr/IBM" <schneik@...>
Stephen White writes:
8 messages
2000/11/07
[#6112] Re: What would a Ruby browser look like?
— Niklas Backlund <d99-nba@...>
2000/11/07
[#6114] Re: What would a Ruby browser look like? -- It's Just a View!
— Hugh Sasse Staff Elec Eng <hgs@...>
2000/11/07
People are already talking about using Tk to do this, or doing it as a WWW
[#6121] More Date/Time inconsistencies — David Suarez de Lis <excalibor@...>
Hi all,
5 messages
2000/11/07
[#6122] Ruby Book, Eng. tl, 6.1 -- aimai ? — Jon Babcock <jon@...>
5 messages
2000/11/07
[#6138] Thoughts on a Ruby browser — hal9000@...
I have to issue a disclaimer first, that I am not a code browser user,
9 messages
2000/11/07
[#6143] Re: What would a Ruby browser look like? — "Conrad Schneiker/Austin/Contr/IBM" <schneik@...>
Matz writes:
5 messages
2000/11/07
[#6149] Ruby hi(gh), and pointer to Jotto program — David Alan Black <dblack@...>
Hello --
7 messages
2000/11/08
[#6152] Re: Ruby hi(gh), and pointer to Jotto program
— Dave Thomas <Dave@...>
2000/11/08
David Alan Black <dblack@candle.superlink.net> writes:
[#6181] Minimal but practically useful Ruby browser? — "Conrad Schneiker/Austin/Contr/IBM" <schneik@...>
Hi,
5 messages
2000/11/08
[#6206] Re: marshal.dump again — ts <decoux@...>
>>>>> "H" == Hugh Sasse Staff Elec Eng <hgs@dmu.ac.uk> writes:
5 messages
2000/11/09
[#6220] ruby-lang.org — Dave Thomas <Dave@...>
7 messages
2000/11/09
[#6246] Re: quiz of the week — "Brian F. Feldman" <green@...>
"Brian F. Feldman" <green@FreeBSD.org> wrote:
10 messages
2000/11/10
[#6247] Re: quiz of the week
— Mathieu Bouchard <matju@...>
2000/11/10
> In case anyone wants something else to try an example of how fun
[#6288] lchown()/etc. and Unix syscall completeness — "Brian F. Feldman" <green@...>
Ruby as it is now isn't very consistent with the system calls it provides.
6 messages
2000/11/12
[#6316] Q: Sandbox security, SAFE and system — Robert Feldt <feldt@...>
Hi,
4 messages
2000/11/13
[#6346] Re: Another Smalltalk control structure idea — "Conrad Schneiker/Austin/Contr/IBM" <schneik@...>
Matz writes:
6 messages
2000/11/14
[#6351] Re: Another Smalltalk control structure idea
— hipster <hipster@...4all.nl>
2000/11/14
On Tue, 14 Nov 2000 15:29:31 +0900, Conrad Schneiker/Austin/Contr/IBM wrote:
[#6363] Re: rescue clause affecting IO loop behavior — ts <decoux@...>
>>>>> "D" == David Alan Black <dblack@candle.superlink.net> writes:
17 messages
2000/11/14
[#6367] Re: rescue clause affecting IO loop behavior
— David Alan Black <dblack@...>
2000/11/14
Hello again --
[#6372] Re: rescue clause affecting IO loop behavior
— Dave Thomas <Dave@...>
2000/11/14
matz@zetabits.com (Yukihiro Matsumoto) writes:
[#6383] 1.6.x documentation. — Hugh Sasse Staff Elec Eng <hgs@...>
On Tue, 14 Nov 2000, Yukihiro Matsumoto wrote:
4 messages
2000/11/15
[#6386] lots of Threads — Hugh Sasse Staff Elec Eng <hgs@...>
If I have an array to be filled with computationally heavy stuff,
12 messages
2000/11/15
[#6387] Re: lots of Threads
— Dave Thomas <Dave@...>
2000/11/15
Hugh Sasse Staff Elec Eng <hgs@dmu.ac.uk> writes:
[#6391] Re: lots of Threads
— Hugh Sasse Staff Elec Eng <hgs@...>
2000/11/16
On Thu, 16 Nov 2000, Dave Thomas wrote:
[#6392] Re: lots of Threads
— hipster <hipster@...4all.nl>
2000/11/16
On Thu, 16 Nov 2000 19:59:07 +0900, Hugh Sasse Staff Elec Eng wrote:
[#6412] clas << a & Pascal's with <record> do...end — Hugh Sasse Staff Elec Eng <hgs@...>
I was thinking that when a lot of work must be done on an object
6 messages
2000/11/17
[#6417] Where is T_RANGE? — Robert Feldt <feldt@...>
Hi,
5 messages
2000/11/17
[#6444] Ruby tokenizer for Ruby — Charles Hixson <charleshixson@...>
Does anyone know of a Ruby tokenizer for Ruby? In particular, I am bother
5 messages
2000/11/19
[#6461] Is there a FITS_IN_UINT(v)? — Robert Feldt <feldt@...>
Hi,
7 messages
2000/11/20
[#6462] Re: Is there a FITS_IN_UINT(v)?
— Dave Thomas <Dave@...>
2000/11/20
Robert Feldt <feldt@ce.chalmers.se> writes:
[#6476] %x{...} and ` not working? — Niklas Backlund <d99-nba@...>
Hi,
6 messages
2000/11/20
[#6485] Re: GUI in ruby — "Conrad Schneiker" <schneik@...>
Hi,
6 messages
2000/11/21
[#6491] comp.lang.tcl -- The "Batteries Included" Distribution [LONG] — "Conrad Schneiker" <schneik@...>
Hi,
4 messages
2000/11/21
[#6494] about proposals and organisation. Was "Batteries Included" Distribution
— hipster <hipster@...4all.nl>
2000/11/21
On Tue, 21 Nov 2000 16:58:30 +0900, Conrad Schneiker wrote:
[#6503] redefining methods in a hierarchy. — Hugh Sasse Staff Elec Eng <hgs@...>
If I have an object which I know to be a subclass of a subclass (at lease)
7 messages
2000/11/21
[#6518] Re: Question about the behavior of write att ributes in blocks — Aleksi Niemel<aleksi.niemela@...>
> Is it at all possible to write an iterator, which allows assignments
6 messages
2000/11/22
[#6533] Re: Question about the behavior of write attributes in blocks
— "Christoph Rippel" <chr@...>
2000/11/22
Thank you for explanation - the output of "x".inspect() is
[#6534] Re: Question about the behavior of write attributes in blocks
— Dave Thomas <Dave@...>
2000/11/22
"Christoph Rippel" <chr@subdimension.com> writes:
[#6538] Re: Question about the behavior of write attributes in blocks
— "Christoph Rippel" <chr@...>
2000/11/23
I lifted the following two lines from your (great) book - Page 285
[#6521] Time Trouble — Niklas Backlund <d99-nba@...>
Hi,
13 messages
2000/11/22
[#6523] alias_method and > and < — Hugh Sasse Staff Elec Eng <hgs@...>
The operators > and < don't seem to be in the list of things one cannot
5 messages
2000/11/22
[#6550] Note on docs for Array#reverse! — Robert Feldt <feldt@...>
6 messages
2000/11/23
[#6571] Re: Ruby/C extension build question — Arjen Laarhoven <arjen@...>
Oops:
1 message
2000/11/24
[#6579] ANN: Ruby/GDChart 0.0.1 available — Arjen Laarhoven <arjen@...>
Hi all,
1 message
2000/11/26
[#6582] best way to interleaf arrays? — David Alan Black <dblack@...>
Hello --
15 messages
2000/11/26
[#6583] Re: best way to interleaf arrays?
— "Brian F. Feldman" <green@...>
2000/11/26
David Alan Black <dblack@candle.superlink.net> wrote:
[#6585] Re: best way to interleaf arrays?
— Dave Thomas <Dave@...>
2000/11/27
David Alan Black <dblack@candle.superlink.net> writes:
[#6593] Re: best way to interleaf arrays?
— David Alan Black <dblack@...>
2000/11/27
[#6594] Re: best way to interleaf arrays?
— Dave Thomas <Dave@...>
2000/11/27
David Alan Black <dblack@candle.superlink.net> writes:
[#6611] Re: best way to interleaf arrays?
— David Alan Black <dblack@...>
2000/11/29
On Tue, 28 Nov 2000, Dave Thomas wrote:
[#6597] Question on sort! — Dave Thomas <Dave@...>
12 messages
2000/11/28
[#6601] Re: Question on sort!
— Dave Thomas <Dave@...>
2000/11/28
matz@zetabits.com (Yukihiro Matsumoto) writes:
[#6604] Re: Question on sort!
— matz@... (Yukihiro Matsumoto)
2000/11/28
Hi,
[#6615] Re: Question on sort!
— Mathieu Bouchard <matju@...>
2000/11/29
> The latter can be avoided if one follows the no-bang-method-chain
[#6642] Hash with a key of nil ? — rpmohn@... (Ross Mohn)
While reading data in from a file and populating a hash, I accidentally
4 messages
2000/11/29
[#6646] RE: Array Intersect (&) question — Aleksi Niemel<aleksi.niemela@...>
Ross asked something about widely known and largely ignored language (on
23 messages
2000/11/29
[#6652] RE: Array Intersect (&) question
— rpmohn@... (Ross Mohn)
2000/11/29
aleksi.niemela@cinnober.com (Aleksi Niemel) wrote in
[#6723] Re: Array Intersect (&) question
— Mathieu Bouchard <matju@...>
2000/12/01
> >Use a hash. Here's code to do both and more. It assumes that
[#6760] Re: Array Intersect (&) question
— "Hal E. Fulton" <hal9000@...>
2000/12/03
----- Original Message -----
[#6744] Re: Array Intersect (&) question
— matz@... (Yukihiro Matsumoto)
2000/12/02
Hi,
[#6656] printing/accessing arrays and hashes — raja@... (Raja S.)
I'm coming to Ruby with a Python & Common Lisp background.
24 messages
2000/11/30
[#6769] Re: printing/accessing arrays and hashes
— Dave Thomas <Dave@...>
2000/12/03
matz@zetabits.com (Yukihiro Matsumoto) writes:
[#6666] Suggestion for addition to Begin/End syntax — drew@... (Andrew D. McDowell)
Hi all.
10 messages
2000/11/30
[ruby-talk:6261] A Really Simple Class Browser
From:
jweirich@...
Date:
2000-11-10 23:44:19 UTC
List:
ruby-talk #6261
After all the talk about a class browser, I threw this together to try
out some ideas. It is a simple browser that allows you to explore the
classes in a running Ruby system. It uses reflection to find the
relationships between classes (and Modules), so there is no reference
back to source code. In fact, in its current state, you can't even
load in other Ruby modules (i.e. it only looks at basic Ruby, the Tk
classes and its own classes).
Despite its rather stripped down functionality, it might be useful as
a starting point to see what is possible and useful. If someone wants
to run with this, feel free to use this as a starting point.
--
-- Jim Weirich jweirich@one.net http://w3.one.net/~jweirich
---------------------------------------------------------------------
"Beware of bugs in the above code; I have only proved it correct,
not tried it." -- Donald Knuth (in a memo to Peter van Emde Boas)
--><--snip--><--------------------------------------------------------
#!/usr/bin/env ruby
# -*- ruby -*-
# Copyright 2000 by Jim Weirich (jweirich@one.net). All rights reserved.
# Permission is granted for use, modification and distribution as
# long as the above copyright notice is included.
require 'tk'
REVISION ="$Revision: 1.3 $"
Class_reject_filter = /^(Errno::.*|fatal)$/
# ====================================================================
# (Additions)
class Object
def if_absent
self
end
end
# ====================================================================
# (Additions)
class NilClass
def if_absent
yield
end
end
# ====================================================================
class BasicListing
attr_reader :list, :selection
attr_writer :select_action
@@packing = {'fill'=>'both', 'expand'=>true, 'side'=>'left'}
def initialize (parent, title, container=nil)
p = @@packing
@widget = (container ? container : TkFrame.new(parent) { pack p } )
TkLabel.new(@widget) {
text title
pack ( 'fill'=>'none', 'expand'=>false, 'side'=>'top', 'anchor'=>'w' )
}
@list = TkListbox.new(@widget) { height 6; width 15; pack p }
sb = TkScrollbar.new (@widget)
sb.command (proc { |*args| @list.yview *args })
sb.pack ('fill'=>'y', 'side'=>'right')
@list.yscrollcommand (proc { |a,b| sb.set(a,b) })
@select_action = proc { puts "Do Nothing" }
@list.bind ("ButtonRelease-1") {
index = @list.curselection[0]
@selection = @list.get(index) if index.is_a?(Integer)
select (@selection)
}
end
def select (aString)
end
def fill (key)
end
def highlight (index)
list.selection_clear (0, 'end')
list.selection_set (index)
list.see (index)
end
private
def class_for_name (class_name)
begin
result = eval(class_name)
rescue
result = nil
end
result
end
def filtered_classes (class_list)
class_list.find_all { |c| c.name !~ Class_reject_filter }
end
end
# ====================================================================
class ClassListing < BasicListing
attr_accessor :class_label, :parent_label
def initialize (parent, title)
super (parent, title)
@target_list = []
end
def highlight_name (class_name)
index = @classes.index(class_name).
if_absent { @classes.index(class_name + " (M)") }
highlight (index) if (index && index.is_a?(Integer))
end
def select (aString)
return unless (String === aString) and (aString != "")
aString =~ /^(\S+)/
class_name = $1
highlight_name(class_name)
update_labels(class_name)
update_targets(class_name)
end
def fill (key)
@list.delete (0, "end")
@classes = []
ObjectSpace.each_object(Module) { |n|
if n.name !~ Class_reject_filter then
@classes << (n.name + ((Class === n) ? "" : " (M)"))
end
}
@classes.sort!
@classes.each {|n| @list.insert ("end", n) }
end
def add_target (target)
@target_list << target
end
private
def update_labels (class_name)
update_class_label (class_name)
update_parent_label (class_name)
end
def update_class_label (class_name)
if @class_label then
@class_label.text (class_name)
end
end
def update_parent_label (class_name)
if @parent_label then
@parent_label.text (parent_of(class_name))
end
end
def update_targets (class_name)
@target_list.each { |t| t.fill(class_name) }
end
def parent_of (class_name)
class_obj = class_for_name(class_name)
if (not (Class === class_obj)) or (class_obj == Object) then
parent_name = ""
else
parent_name = class_obj.superclass.name
end
end
end
# ====================================================================
class NameListing < BasicListing
attr_accessor :target, :selection
def initialize (parent, title, container=nil)
super (parent, title, container)
@names = []
@target = nil
@selection = nil
end
def highlight_name (name)
index = @names.index(name)
highlight (index) if index.is_a?(Integer)
end
def select (name)
@selection = name
highlight_name (name)
@target.select(@selection) if @target
end
def fill (name)
@names = find_names_for (name)
@list.delete (0, "end")
@names.each { |n| @list.insert ("end", n) }
end
end
# ====================================================================
class ModuleListing < NameListing
private
def find_names_for (class_name)
class_obj = class_for_name(class_name)
filtered_classes (class_obj.included_modules.sort)
end
end
# ====================================================================
class ChildListing < NameListing
private
def find_names_for (class_name)
class_obj = class_for_name(class_name)
list = []
ObjectSpace.each_object(Class) { |c|
list << c if c.superclass == class_obj
}
filtered_classes (list.sort)
end
end
# ====================================================================
class MethodListing < BasicListing
def initialize (parent, title)
super(parent, title)
@flat_view = false
@show_class_methods = false
end
def select (class_name)
end
def toggle_flat_view
@flat_view = (not @flat_view)
end
def toggle_class_methods
@show_class_methods = (not @show_class_methods)
end
def fill (class_name)
return if not class_name
@list.delete (0, "end")
methods = find_methods(class_name)
methods.sort.each { |m|
@list.insert ("end", m)
}
end
def find_methods (class_name)
result = []
class_obj = class_for_name(class_name)
return [] if class_obj == nil
if @show_class_methods and @flat_view then
result = find_flat_class_methods(class_obj)
elsif @show_class_methods then
result = find_class_methods(class_obj)
elsif @flat_view then
result = find_flat_instance_methods (class_obj)
else
result = find_instance_methods(class_obj)
end
result
end
def find_instance_methods (class_obj)
class_obj.instance_methods
end
def find_flat_instance_methods (class_obj)
if not class_obj.is_a?(Class) then
result = class_obj.instance_methods
else
result = []
c = class_obj
while c != nil
result |= c.instance_methods
c = c.superclass
end
class_obj.included_modules.each { |m|
result |= m.instance_methods
}
end
result
end
def find_flat_class_methods (class_obj)
class_obj.methods
end
def find_class_methods (class_obj)
result = class_obj.methods
if class_obj.is_a?(Class) then
result = result - class_obj.superclass.methods
end
result
end
end
# Top Level Methods ==================================================
def create_gui
root = TkRoot.new { title "Gem Hunter" }
buttons = TkFrame.new {
pack ( 'fill'=>'x', 'expand'=>false, 'side'=>'bottom' )
}
TkButton.new(buttons) {
text 'Exit'
command proc { exit }
pack ( 'fill'=>'x', 'expand'=>false, 'side'=>'right')
}
flat_button = TkCheckButton.new (buttons) {
text 'Flat View'
pack ( 'fill'=>'x', 'expand'=>false, 'side'=>'left')
}
cm_button = TkCheckButton.new (buttons) {
text 'Class Methods'
variable TkVariable.new ($checked)
pack ( 'fill'=>'x', 'expand'=>false, 'side'=>'left')
}
labels = TkFrame.new { pack ( 'fill'=>'x', 'expand'=>false ) }
class_label = TkLabel.new(labels) {
text "Class: "
pack ( 'fill'=>'none',
'expand'=>false,
'side'=>'left',
'anchor'=>'w')
}
class_label = TkLabel.new (labels) {
relief 'groove'
width 15
pack ( 'fill'=>'x',
'expand'=>true,
'side'=>'left',
'anchor'=>'w')
}
parent_label = TkButton.new (labels) {
text ""
width 15
pack ( 'fill'=>'x',
'expand'=>true,
'side'=>'right',
'anchor'=>'w')
}
TkLabel.new(labels) {
text "Parent: "
pack ( 'fill'=>'none',
'expand'=>false,
'side'=>'right',
'anchor'=>'w')
}
windows = TkFrame.new { pack ('fill'=>'both', 'expand'=>true) }
class_list = ClassListing.new (windows, "Classes")
center_frame = TkFrame.new(windows) {
pack ('fill'=>'both', 'expand'=>true, 'side'=>'left')
}
center_top_frame = TkFrame.new (center_frame) {
pack ('fill'=>'both', 'expand'=>true, 'side'=>'top')
}
center_bottom_frame = TkFrame.new (center_frame) {
pack ('fill'=>'both', 'expand'=>true, 'side'=>'top')
}
module_list = ModuleListing.new (center_top_frame,
"Included Modules",
center_top_frame)
child_list = ChildListing.new (center_bottom_frame,
"Subclasses",
center_bottom_frame)
method_list = MethodListing.new (windows, "Methods")
parent_label.command proc {
class_name = parent_label.text
if class_name.is_a?(String) and (class_name!="") then
class_list.select(parent_label.text)
end
}
class_list.add_target (method_list)
class_list.add_target (module_list)
class_list.add_target (child_list)
class_list.class_label = class_label
class_list.parent_label = parent_label
class_list.fill("")
module_list.target = class_list
child_list.target = class_list
cm_button.command proc {
method_list.toggle_class_methods
class_list.select(class_list.selection)
}
flat_button.command proc {
method_list.toggle_flat_view
class_list.select(class_list.selection)
}
end
# Main ===============================================================
def main
create_gui
Tk.mainloop
end
if __FILE__ == $0 then
main
end