ruby - Shoes 中实例变量的奇怪行为

Question

大家好。我正在使用 Shoes 为 Ruby 项目制作 GUI。

我有一个名为 Manager 的类(如在内存管理器中)，它从文件中加载“进程列表”，将其拆分并在进行某个执行调用时将内容分配给内存中的不同“页面”。不过，我真的认为这部分并不重要。这一切都可以作为终端应用程序正常工作。

但是，Shoes 只是让我感到困惑。到目前为止，这是我得到的:

Shoes.app(:title => "Paging Simulator", :width => 800, :height => 450) do
  @manager = Manager.new
  stack(:width => 200) do
    @exec_list = stack {
      title "Execution Queue", :size => 14
      @exec_lines = para "click button to load", :size => 9
      @file_button = button "Load Process List"
      @file_button.click {
        filename = ask_open_file
        # @manager.set_exec_list filename
        # alert "this makes no sense"
        @exec_lines.text = @manager.exec_list.join "\n"
        # exec_lines.text = File.read filename
      }
    }
  end
end

当我运行这个时会发生什么:

程序 View 按预期加载。我得到一个标题，一段写着“点击按钮......”的段落，以及一个按钮。我单击按钮并选择文件。但这就是事情变得奇怪的地方。

如果我运行最后一条注释行 exec_lines.text = File.read filename 它会按照我的意愿运行，但我的经理没有得到它需要的任何信息。

如果我运行 @manager.set_exec_list filename 行， block 中该行的 nothing 会运行，包括 alert，或我尝试放入其中的任何其他代码。

但是，如果我按上面所示运行，我会得到我期望的输出，但我无法从我选择的文件中设置我的数据。

我试图从 Shoes Rules 中找出答案页面，但这似乎不是他们解决的问题，我想我理解他们的“它改变/不改变 self ”，但它令人困惑，我认为它与这个问题并不完全相关。

有人知道如何让它工作吗？我在这个项目上有点紧迫，而且我似乎无法让任何其他 Ruby GUI 工具包运行，所以我认为我对 Shoes 很着迷。

谢谢。

更新当我调用 @manager.set_exec_list filename 时，我尝试在代码上运行 ruby​​-debug，并单步执行显示调用已完成，但代码实际上从未(从我的角度来看) can tell) 跳转到那个方法，并且表现得好像它是代码块中的最后一行代码。我是否需要将这些类包含在 Shoes.app block 中？更新 不。这没有什么不同。

更新完整源代码如下:

#!/usr/bin/env shoes
require 'rubygems'
require 'ruby-debug'

class MemSegment
  attr_accessor :filled, :pid, :seg, :seg_id

  def initialize(filled=false, pid=nil, seg=nil, seg_id=0)
    @filled = filled
    @pid = pid.to_i
    @seg = seg.to_s
    @seg_id = seg_id.to_i
    self
  end

  def fill(pid, seg, seg_id)
    @filled = true; @pid = pid; @seg = seg; @seg_id = seg_id;
    self
  end

  def clear
    self.filled = false; self.pid = nil; self.seg = nil;
    self
  end

  def filled?
    @filled
  end

  def to_s
    filled? ? "#{seg} #{seg_id} for pid #{pid}" : "Free"
  end
end

class SimProc
  include Enumerable
  attr_accessor :pid, :code, :data

  def initialize(pid, code, data)
    @pid = pid.to_i
    @code = code.to_i
    @data = data.to_i
  end

  def each
    yield :code, code
    yield :data, data
  end

  def to_s
    "[SimProc :pid => #{pid}, :code => #{code}, :data => #{data}]"
  end

  def to_a
    [@pid, @code, @data]
  end
end

class Manager
  attr_reader :segments, :processes, :exec_list, :exec_object

  def initialize
    @exec_list = [[1, 2], [3, 4], [5, 6]]
    @processes = {}
    @segments = Array.new(8) { MemSegment.new }
  end

  def print_activity
    @segments.each_with_index {|s, index| puts "Seg #{index} => #{s}" }
    @processes.each_value {|s| puts s }
  end

  def load_process(pcb, exec_index)
    if pcb.size == 3
      p = SimProc.new(*pcb)
      bad_load = false

      @processes.store p.pid, p
      @processes[p.pid].each do |proc_seg, bsize|
        (bsize / 512.0).ceil.times do |seg_id|
          @segments.each_with_index do |s, index|
            if !s.filled
              #find the first empty memory segment
              s.fill p.pid, proc_seg, seg_id
              break
            # if all slots are filled and we couldn't place a proc block
            elsif index == @segments.size - 1
              bad_load = true
              puts "Cannot find a place for #{proc_seg} segment of size #{bsize}. Requeueing..."
              break;
            end
          end
          break if bad_load
        end
      end
      # recover pages and queue the process for later
      if bad_load
        @segments.each_with_index do |seg, seg_index|
          # clear any segments that didn't get loaded properly
          if seg.pid == p.pid
            seg.clear
            puts "Seg #{seg_index} => segment cleared: #{seg}"
          end
        end
        # reinsert this process after the next in the execution list
        # it will attempt to load and run after the next process is performed
        @exec_list.insert(exec_index + 2, p.to_a)
      end
      print_activity

    elsif pcb.size == 2 and pcb[1] == -1
      # a process is exiting
      puts "removing pid #{pcb[0]}"
      @segments.each { |s| s.clear if s.pid == pcb[0] }
      @processes.delete pcb[0]
      print_activity
    end
  end

  def set_exec_list(filename)
    file = File.open filename
    file.each { |pcb| @exec_list << pcb.split.map(&:to_i) } unless file.nil?
    filename
  end

  def main
    exseq = File.open('exseq2.txt')
    set_exec_list exseq

    # this is the object that will be used to run each process with .next
    @exec_object = @exec_list.each_with_index
    # @exec_list.each_with_index { |pcb, exec_index| load_process(pcb, exec_index) }
    (@exec_list.size + 1).times do
      load_process(*@exec_object.next)
    end
  end
end

=begin
manager = Manager.new
manager.main
=end

#=begin
Shoes.app(:title => "Paging Simulator", :width => 800, :height => 450) do
  @manager = Manager.new
  stack(:width => 200) do
    @exec_list = stack {
      title "Execution Queue", :size => 14
      @exec_lines = para "click button to load", :size => 9
      @file_button = button "Load Process List"
      debugger
      @file_button.click {
        filename = ask_open_file
        @manager.set_exec_list filename
        # alert "this makes no sense"
        # @exec_lines.text = @manager.exec_list
        # @exec_lines.text = File.read filename
        @exec_lines.text = @manager.exec_list.join "\n"
      }
    }
  end
end
#=end

Answer 1

所以，有几件事:

#1，我没有Manager 的实现，所以我不能告诉你它为什么会崩溃。您是否尝试检查 Shoes 控制台是否有任何错误？点击 control-/调出它。如果“到达那条线后没有任何东西运行”，那可能就是问题所在。

#2，这对我有用，只要您在最后一行将 exec_lines 更改为 @exec_lines 即可。这是我尝试过的:

class Manager;end
Shoes.app(:title => "Paging Simulator", :width => 800, :height => 450) do
  @manager = Manager.new
  stack(:width => 200) do
    @exec_list = stack {
      title "Execution Queue", :size => 14
      @exec_lines = para "click button to load", :size => 9
      @file_button = button "Load Process List"
      @file_button.click {
        filename = ask_open_file
        #alert "this makes no sense"
        @exec_lines.text = File.read filename
      }
    }
  end
end

希望对您有所帮助!