apsheronets

module Lwt_thread = struct
  type 'a t = 'a Lwt.t
  let return = Lwt.return
  let (>>=) = Lwt.(>>=)
  let fail = Lwt.fail
  let catch = Lwt.catch
  type in_channel = Lwt_io.input_channel
  type out_channel = Lwt_io.output_channel
  let open_connection sockaddr = Lwt_io.open_connection sockaddr
  let output_char = Lwt_io.write_char

apsheronets

PACKAGES = lwt
FILES = one.ml two.ml

CAMLC   = ocamlfind ocamlc   -thread $(LIB)
CAMLOPT = ocamlfind ocamlopt -thread $(LIB)
CAMLDEP = ocamlfind ocamldep $(LIB)
LIB = -package $(PACKAGES)

all: executable.opt executable.byte

apsheronets

/home/user/.gem/ruby/2.7.0/ruby/2.7.0/gems/nokogumbo-1.4.13/lib/nokogumbo.rb:24: [BUG] Segmentation fault at 0x0000000000000000
ruby 2.7.4p191 (2021-07-07 revision a21a3b7d23) [x86_64-linux-gnu]

-- Control frame information -----------------------------------------------
c:0006 p:---- s:0032 e:000031 CFUNC  :parse
c:0005 p:0066 s:0027 e:000026 METHOD /home/user/.gem/ruby/2.7.0/ruby/2.7.0/gems/nokogumbo-1.4.13/lib/nokogumbo.rb:24
c:0004 p:0044 s:0022 e:000021 METHOD /home/user/.gem/ruby/2.7.0/ruby/2.7.0/gems/sanitize-4.5.0/lib/sanitize.rb:123
c:0003 p:0021 s:0014 e:000013 METHOD /home/user/.gem/ruby/2.7.0/ruby/2.7.0/gems/sanitize-4.5.0/lib/sanitize.rb:52
c:0002 p:0037 s:0008 E:000568 EVAL   fail.rb:6 [FINISH]
c:0001 p:0000 s:0003 E:001320 (none) [FINISH]

apsheronets

while true
  needs_update = Feed.needs_update
  count = needs_update.count
  if count > 0
    puts "#{count} feeds need to be updated"
    needs_update.each do |feed|
      begin
        puts "Feed #{feed.id} is going to be updated"
        start = Time.now
        feed.force_update!