PasteRack.org
Paste # 12999
2018-05-24 15:52:54

Fork as a new paste.

Paste viewed 139 times.


Embed:

#lang racket

(require db
          sql)

(define db-conn (sqlite3-connect
                 #:database "foo.db"
                 #:mode 'create))
(query-exec db-conn
            (create-table #:if-not-exists tasks
                          #:columns [task varchar]       
                                    [status integer]))
(query-exec db-conn
            (create-table #:if-not-exists notes
                          #:columns [task_ref integer]
                                    [note varchar]))

(query-rows db-conn 
            (left-join 
             (select rowid task status 
                     #:from tasks) 
             (select (as (count note) notes_count) task_ref 
                     #:from annotations #:group-by task_ref) 
             #:on (= rowid task_ref)))

=>

standard-module-name-resolver: collection not found
  for module path: sql
  collection: "sql"
  in collection directories:
   /home/pasterack/.racket/6.8/collects
   /home/pasterack/racket68/collects
   ... [161 additional linked and package directories]
  context...:
   show-collection-err
   standard-module-name-resolver
   /home/pasterack/racket68/collects/racket/require-transform.rkt:266:2: expand-import
   /home/pasterack/racket68/collects/racket/private/reqprov.rkt:571:24
   /home/pasterack/racket68/collects/racket/private/reqprov.rkt:559:5
   /home/pasterack/racket68/collects/racket/require-transform.rkt:266:2: expand-import
   /home/pasterack/racket68/collects/racket/private/reqprov.rkt:266:21: try-next
   /home/pasterack/racket68/collects/racket/private/reqprov.rkt:348:21: try-next
   /home/pasterack/racket68/collects/racket/private/reqprov.rkt:243:2
   /home/pasterack/racket68/collects/syntax/wrap-modbeg.rkt:46:4
   standard-module-name-resolver
   loop
   ...cket/cmdline.rkt:179:51
   /home/pasterack/racket68/share/pkgs/scribble-lib/scribble/run.rkt: [running body]