# $Id: match.rb,v 1.3 2003/12/30 06:11:02 yuya Exp $

$_ = 'foobarbaz'
if /foo/
  p(:ok)
  p($&)
else 
  p(:ng)
end

# NodeDump V0.1.7
# 
# NODE_BLOCK: 
#   NODE_NEWLINE:  [match.rb:3]
#     NODE_GASGN: 
#       NODE_STR:  "foobarbaz"
#       Assign to GV 6843 ($_)
#   NODE_NEWLINE:  [match.rb:4]
#     NODE_IF: 
#       NODE_MATCH: /foo/
#     then:
#       NODE_BLOCK: 
#         NODE_NEWLINE:  [match.rb:5]
#           NODE_FCALL:  to function: 6753 (p)
#             Parameters:
#               NODE_ARRAY:  size = 1
#                 NODE_LIT:  Symbol: 8961 (ok)
#         NODE_NEWLINE:  [match.rb:6]
#           NODE_FCALL:  to function: 6753 (p)
#             Parameters:
#               NODE_ARRAY:  size = 1
#                 NODE_BACK_REF:  ($&)
#     else:
#       NODE_NEWLINE:  [match.rb:8]
#         NODE_FCALL:  to function: 6753 (p)
#           Parameters:
#             NODE_ARRAY:  size = 1
#               NODE_LIT:  Symbol: 8969 (ng)