2005-04-13 11:30:15 -04:00
|
|
|
#
|
2009-03-05 22:56:38 -05:00
|
|
|
# output-method.rb - optput methods used by irb
|
2009-07-07 07:36:20 -04:00
|
|
|
# $Release Version: 0.9.6$
|
2005-04-13 11:30:15 -04:00
|
|
|
# $Revision$
|
|
|
|
# by Keiju ISHITSUKA(keiju@ruby-lang.org)
|
|
|
|
#
|
|
|
|
# --
|
|
|
|
#
|
2009-03-05 22:56:38 -05:00
|
|
|
#
|
2005-04-13 11:30:15 -04:00
|
|
|
#
|
|
|
|
|
|
|
|
require "e2mmap"
|
|
|
|
|
|
|
|
module IRB
|
|
|
|
# OutputMethod
|
|
|
|
# StdioOutputMethod
|
|
|
|
|
|
|
|
class OutputMethod
|
|
|
|
@RCS_ID='-$Id$-'
|
|
|
|
|
|
|
|
def print(*opts)
|
|
|
|
IRB.fail NotImplementError, "print"
|
|
|
|
end
|
|
|
|
|
|
|
|
def printn(*opts)
|
|
|
|
print opts.join(" "), "\n"
|
|
|
|
end
|
|
|
|
|
|
|
|
# extend printf
|
|
|
|
def printf(format, *opts)
|
|
|
|
if /(%*)%I/ =~ format
|
|
|
|
format, opts = parse_printf_format(format, opts)
|
|
|
|
end
|
|
|
|
print sprintf(format, *opts)
|
|
|
|
end
|
|
|
|
|
|
|
|
# %
|
2007-12-24 11:09:31 -05:00
|
|
|
# <flag> [#0- +]
|
|
|
|
# <minimum field width> (\*|\*[1-9][0-9]*\$|[1-9][0-9]*)
|
|
|
|
# <precision>.(\*|\*[1-9][0-9]*\$|[1-9][0-9]*|)?
|
|
|
|
# #<length modifier>(hh|h|l|ll|L|q|j|z|t)
|
2009-03-05 22:56:38 -05:00
|
|
|
# <conversion specifier>[diouxXeEfgGcsb%]
|
2005-04-13 11:30:15 -04:00
|
|
|
def parse_printf_format(format, opts)
|
|
|
|
return format, opts if $1.size % 2 == 1
|
|
|
|
end
|
|
|
|
|
|
|
|
def puts(*objs)
|
|
|
|
for obj in objs
|
|
|
|
print(*obj)
|
|
|
|
print "\n"
|
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
def pp(*objs)
|
2005-04-14 02:16:08 -04:00
|
|
|
puts(*objs.collect{|obj| obj.inspect})
|
2005-04-13 11:30:15 -04:00
|
|
|
end
|
|
|
|
|
|
|
|
def ppx(prefix, *objs)
|
2005-04-14 02:16:08 -04:00
|
|
|
puts(*objs.collect{|obj| prefix+obj.inspect})
|
2005-04-13 11:30:15 -04:00
|
|
|
end
|
|
|
|
|
|
|
|
end
|
|
|
|
|
|
|
|
class StdioOutputMethod<OutputMethod
|
|
|
|
def print(*opts)
|
2005-04-14 02:16:08 -04:00
|
|
|
STDOUT.print(*opts)
|
2005-04-13 11:30:15 -04:00
|
|
|
end
|
|
|
|
end
|
|
|
|
end
|