resolve ctrl-c problem.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_6@1400 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

ChangeLog

@@ -1,3 +1,7 @@
+Thu May 17 05:23:52 2001  Keiju Ishitsuka <keiju@ishitsuka.com>
+	* lib/irb.rb lib/irb/multi-irb.rb lib/irb/ruby-lex.rb lib/irb/version.rb
+	  resolve ctrl-c problem
+	
 Tue May 15 17:46:37 2001  Yukihiro Matsumoto  <matz@ruby-lang.org>
 
 	* array.c (rb_ary_and): should not push frozen key string.

lib/irb.rb

@@ -1,6 +1,6 @@
 #
 #   irb.rb - irb main module
-#   	$Release Version: 0.7.3 $
+#   	$Release Version: 0.7.4 $
 #   	$Revision$
 #   	$Date$
 #   	by Keiju ISHITSUKA(keiju@ishitsuka.com)
@@ -209,8 +209,7 @@ module IRB
       case @signal_status
       when :IN_INPUT
 	print "^C\n"
-	@scanner.initialize_input
+	raise RubyLex::TerminateLineInput
-	print @context.io.prompt
       when :IN_EVAL
 	IRB.irb_abort(self)
       when :IN_LOAD

lib/irb/multi-irb.rb

@@ -31,7 +31,7 @@ module IRB
 
     def thread(key)
       th, irb = search(key)
-      irb
+      th
     end
 
     def irb(key)
@@ -58,6 +58,7 @@ module IRB
       @current_job = irb
       th.run
       Thread.stop
+      p "X"
       @current_job = irb(Thread.current)
     end
 
@@ -74,7 +75,7 @@ module IRB
       when Integer
 	@jobs[key]
       when Irb
-	@jobs.find{|k, v| v.equal?(irb)}
+	@jobs.find{|k, v| v.equal?(key)}
       when Thread
 	@jobs.assoc(key)
       else
@@ -156,6 +157,7 @@ module IRB
       end
       @CONF[:IRB_RC].call(irb.context) if @CONF[:IRB_RC]
       @JobManager.insert(irb)
+      @JobManager.current_job = irb
       begin
 	system_exit = false
 	catch(:IRB_EXIT) do
@@ -200,8 +202,32 @@ module IRB
   @JobManager.insert(@CONF[:MAIN_CONTEXT].irb)
   @JobManager.current_job = @CONF[:MAIN_CONTEXT].irb
 
+  class Irb
+    def signal_handle
+      unless @context.ignore_sigint?
+	print "\nabort!!\n" if @context.verbose?
+	exit
+      end
+
+      case @signal_status
+      when :IN_INPUT
+	print "^C\n"
+	IRB.JobManager.thread(self).raise RubyLex::TerminateLineInput
+      when :IN_EVAL
+	IRB.irb_abort(self)
+      when :IN_LOAD
+	IRB.irb_abort(self, LoadAbort)
+      when :IN_IRB
+	# ignore (JP: $B2?$b$7$J$$(B.)
+      else
+	# ignore (JP: $B$=$NB>$N>l9g$b2?$b$7$J$$(B.)
+      end
+    end
+  end
+
   trap("SIGINT") do
     @JobManager.current_job.signal_handle
+    Thread.stop
   end
 
 end

lib/irb/ruby-lex.rb

@@ -24,6 +24,8 @@ class RubyLex
   def_exception(:TkReading2TokenDuplicateError, 
 		"key duplicate(token_n='%s', key='%s')")
   def_exception(:SyntaxError, "%s")
+
+  def_exception(:TerminateLineInput, "Terminate Line Input")
   
   include RubyToken
 
@@ -211,27 +213,35 @@ class RubyLex
   
   def each_top_level_statement
     initialize_input
-    loop do
+    catch(:TERM_INPUT) do
-      @continue = false
+      loop do
-      prompt
+	begin
-      unless l = lex
+	  @continue = false
-	break if @line == ''
+	  prompt
-      else
+	  unless l = lex
-	# p l
+	    throw :TERM_INPUT if @line == ''
-	@line.concat l
+	  else
-	if @ltype or @continue or @indent > 0
+	    #p l
-	  next
+	    @line.concat l
+	    if @ltype or @continue or @indent > 0
+	      next
+	    end
+	  end
+	  if @line != "\n"
+	    yield @line, @exp_line_no
+	  end
+	  break unless l
+	  @line = ''
+	  @exp_line_no = @line_no
+
+	  @indent = 0
+	  prompt
+	rescue TerminateLineInput
+	  initialize_input
+	  prompt
+	  get_readed
 	end
       end
-      if @line != "\n"
-	yield @line, @exp_line_no
-      end
-      break unless l
-      @line = ''
-      @exp_line_no = @line_no
-
-      @indent = 0
-      prompt
     end
   end
 

lib/irb/version.rb

@@ -1,6 +1,6 @@
 #
 #   irb/version.rb - irb version definition file
-#   	$Release Version: 0.7.3$
+#   	$Release Version: 0.7.4$
 #   	$Revision$
 #   	$Date$
 #   	by Keiju ISHITSUKA(keiju@ishitsuka.com)
@@ -11,6 +11,6 @@
 #
 
 module IRB
-  @RELEASE_VERSION = "0.7.3"
+  @RELEASE_VERSION = "0.7.4"
-  @LAST_UPDATE_DATE = "01/04/16"
+  @LAST_UPDATE_DATE = "01/05/08"
 end