#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))