{"size": 2371, "ext": "rktd", "max_stars_repo_path": "db-doc/db/scribblings/log-for-connect.rktd", "max_stars_repo_name": "Bogdanp/racket-db", "max_stars_repo_stars_event_min_datetime": "2015-01-23T01:06:46.000Z", "max_stars_repo_stars_event_max_datetime": "2021-01-28T09:51:50.000Z", "max_issues_repo_path": "db-doc/db/scribblings/log-for-connect.rktd", "max_issues_repo_name": "Bogdanp/racket-db", "max_issues_repo_issues_event_min_datetime": "2015-02-23T01:59:45.000Z", "max_issues_repo_issues_event_max_datetime": "2022-01-16T05:40:36.000Z", "max_forks_repo_path": "db-doc/db/scribblings/log-for-connect.rktd", "max_forks_repo_name": "Bogdanp/racket-db", "max_forks_repo_forks_event_min_datetime": "2015-02-20T03:02:29.000Z", "max_forks_repo_forks_event_max_datetime": "2021-10-09T05:03:24.000Z"}
{"max_stars_count": 18, "max_issues_count": 24, "max_forks_count": 16, "avg_line_length": 28.5662650602, "max_line_length": 75, "alphanum_fraction": 0.5170814003}
;; This file was created by make-log-based-eval
((require racket/class db db/util/postgresql db/util/datetime)
 ((3) 0 () 0 () () (c values c (void)))
 #""
 #"")
((begin
   (define pgc (dsn-connect 'db-scribble-env))
   (query-exec
    pgc
    "create temporary table the_numbers (n integer, d varchar(20))")
   (query-exec pgc "insert into the_numbers values (0, 'nothing')")
   (query-exec
    pgc
    "insert into the_numbers values (1, 'the loneliest number')")
   (query-exec pgc "insert into the_numbers values (2, 'company')")
   (query-exec pgc "insert into the_numbers values (3, 'a crowd')"))
 ((3) 0 () 0 () () (c values c (void)))
 #""
 #"")
((define pool
   (connection-pool
    (lambda ()
      (displayln "connecting!")
      (sqlite3-connect #:database 'memory))))
 ((3) 0 () 0 () () (c values c (void)))
 #""
 #"")
((define c1 (connection-pool-lease pool))
 ((3) 0 () 0 () () (c values c (void)))
 #"connecting!\n"
 #"")
((define c2 (connection-pool-lease pool))
 ((3) 0 () 0 () () (c values c (void)))
 #"connecting!\n"
 #"")
((disconnect c1) ((3) 0 () 0 () () (c values c (void))) #"" #"")
((define c3 (connection-pool-lease pool))
 ((3) 0 () 0 () () (c values c (void)))
 #""
 #"")
((define c
   (virtual-connection
    (lambda () (printf "connecting!\n") (dsn-connect 'db-scribble-env))))
 ((3) 0 () 0 () () (c values c (void)))
 #""
 #"")
((connected? c) ((3) 0 () 0 () () (q values #f)) #"" #"")
((query-value c "select 1")
 ((3) 0 () 0 () () (q values 1))
 #"connecting!\n"
 #"")
((connected? c) ((3) 0 () 0 () () (q values #t)) #"" #"")
((void (thread (lambda () (displayln (query-value c "select 2")))))
 ((3) 0 () 0 () () (c values c (void)))
 #"connecting!\n2\n"
 #"")
((disconnect c) ((3) 0 () 0 () () (c values c (void))) #"" #"")
((connected? c) ((3) 0 () 0 () () (q values #f)) #"" #"")
((query-value c "select 3")
 ((3) 0 () 0 () () (q values 3))
 #"connecting!\n"
 #"")
((prepare c "select 2 + $1")
 ((3)
  0
  ()
  0
  ()
  ()
  (q exn "prepare: cannot prepare statement with virtual connection"))
 #""
 #"")
((query-value c "select 2 + $1" 2) ((3) 0 () 0 () () (q values 4)) #"" #"")
((define pst (virtual-statement "select 2 + $1"))
 ((3) 0 () 0 () () (c values c (void)))
 #""
 #"")
((query-value c pst 3) ((3) 0 () 0 () () (q values 5)) #"" #"")
((begin (set! c #f) (set! pst #f))
 ((3) 0 () 0 () () (c values c (void)))
 #""
 #"")
