#lang scheme/base
;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; SESSION.plt - a session store built on top of bzlib/dbi
;;
;; Bonzai Lab, LLC.  All rights reserved.
;;
;; Licensed under LGPL.
;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; util.ss - the basic utility functions
;; yc 11/15/2009 - first version
(require "depend.ss")

(define (session-query-path dir)
  (build-path (this-expression-source-directory)
              "sql"
              dir
              "query.sql"))

(define (session-query-path/sqlite)
  (session-query-path "sqlite"))

(define (session-query-path/postgres)
  (session-query-path "postgres"))

(define (session-query-path/mysql)
  (session-query-path "mysql"))

(provide (all-defined-out))