module FFI::LegacyForkTracking::IOExt

def popen(*args)
  return super unless args[0] == '-'
  super(*args) do |pipe|
    FFI._async_cb_dispatcher_atfork_child if pipe.nil?
    yield pipe
  end
end