Commit 12c758c4 authored by Dave Griffiths's avatar Dave Griffiths
Browse files

Merge branch 'master' of

parents e23b605c c1b5bb68
......@@ -138,7 +138,7 @@
(build db (- n 1))))
(define (test)
(let ((db (open-db "unit.db")))
(let ((db (db-open "unit.db")))
(build db 99999999)
......@@ -35,7 +35,7 @@
;;(define setuid (get-ffi-obj 'setuid #f (_fun _int -> _int)))
(define db-name "mongoose.db")
(define db (open-db db-name))
(define db (db-open db-name))
(open-log "log.txt")
(define registered-requests
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment