changelog shortlog graph tags branches changeset files file revisions raw help

Mercurial > core / annotate lisp/lib/q/pkg.lisp

changeset 575: efb4a19ff530
parent: a2fe095379f9
child: 806c2b214df8
author: Richard Westhaver <ellis@rwest.io>
date: Sun, 04 Aug 2024 00:18:52 -0400
permissions: -rw-r--r--
description: color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
482
686748796f08 progress on Q
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
1
 ;;; q/pkg.lisp --- Q Lang Packages
686748796f08 progress on Q
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
2
 
686748796f08 progress on Q
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
3
 ;;
686748796f08 progress on Q
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
4
 
686748796f08 progress on Q
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
5
 ;;; Code:
575
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
6
 (defpackage :q/proto
482
686748796f08 progress on Q
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
7
   (:use :cl :std :obj/query :obj/id)
575
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
8
   (:export
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
9
    :query-engine :query-parser))
482
686748796f08 progress on Q
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
10
            
686748796f08 progress on Q
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
11
 (defpackage :q/sql
502
a2fe095379f9 fix dns, rename lql->dql
Richard Westhaver <ellis@rwest.io>
parents: 483
diff changeset
12
   (:nicknames :sql)
575
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
13
   (:use :cl :std :q/proto :parse/pratt :obj/query :obj/id)
482
686748796f08 progress on Q
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
14
   (:export
502
a2fe095379f9 fix dns, rename lql->dql
Richard Westhaver <ellis@rwest.io>
parents: 483
diff changeset
15
    :sql-error
a2fe095379f9 fix dns, rename lql->dql
Richard Westhaver <ellis@rwest.io>
parents: 483
diff changeset
16
    :read-sql-string
a2fe095379f9 fix dns, rename lql->dql
Richard Westhaver <ellis@rwest.io>
parents: 483
diff changeset
17
    :read-sql-stream
a2fe095379f9 fix dns, rename lql->dql
Richard Westhaver <ellis@rwest.io>
parents: 483
diff changeset
18
    :parse-expression
483
345e4fb28bcd more sql work
Richard Westhaver <ellis@rwest.io>
parents: 482
diff changeset
19
    :sql-tokens
575
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
20
    :sql-parser
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
21
    :simple-sql-error
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
22
    :sql-token-error
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
23
    :illegal-sql-state
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
24
    :sql-query
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
25
    :sql-data-source
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
26
    :sql-expression
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
27
    :sql-expression-vector
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
28
    :sql-identifier
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
29
    :sql-string
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
30
    :sql-number
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
31
    :sql-function
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
32
    :sql-alias
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
33
    :sql-cast
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
34
    :sql-sort
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
35
    :sql-relation
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
36
    :sql-select
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
37
    :sql-planner
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
38
    :sql-optimizer
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
39
    :*sql-token-types*
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
40
    :sql-token-type-designator
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
41
    :*sql-keywords*
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
42
    :*sql-keyword-table*
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
43
    :*sql-symbol-table*
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
44
    :get-sql-keyword
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
45
    :get-sql-symbol
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
46
    :*sql-symbols*
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
47
    :sql-token
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
48
    :next-sql-token
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
49
    :with-sql-parser
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
50
    :sql-math-expression
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
51
    :sql-binary-expression
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
52
    :with-sql-stream
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
53
    :with-sql-string
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
54
    :with-sql))
482
686748796f08 progress on Q
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
55
 
502
a2fe095379f9 fix dns, rename lql->dql
Richard Westhaver <ellis@rwest.io>
parents: 483
diff changeset
56
 (defpackage :q/dql
a2fe095379f9 fix dns, rename lql->dql
Richard Westhaver <ellis@rwest.io>
parents: 483
diff changeset
57
   (:nicknames :dql)
575
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
58
   (:use :cl :std :q/proto :obj/query :obj/id :dat/sxp :dat/proto)
502
a2fe095379f9 fix dns, rename lql->dql
Richard Westhaver <ellis@rwest.io>
parents: 483
diff changeset
59
   (:export
a2fe095379f9 fix dns, rename lql->dql
Richard Westhaver <ellis@rwest.io>
parents: 483
diff changeset
60
    :dql-error
a2fe095379f9 fix dns, rename lql->dql
Richard Westhaver <ellis@rwest.io>
parents: 483
diff changeset
61
    :dql-data-source
a2fe095379f9 fix dns, rename lql->dql
Richard Westhaver <ellis@rwest.io>
parents: 483
diff changeset
62
    :dql-query
a2fe095379f9 fix dns, rename lql->dql
Richard Westhaver <ellis@rwest.io>
parents: 483
diff changeset
63
    :dql-expression))
482
686748796f08 progress on Q
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
64
 
686748796f08 progress on Q
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
65
 ;; (defpackage :q/e)
686748796f08 progress on Q
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
66
 
686748796f08 progress on Q
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
67
 (in-package :std-user)
686748796f08 progress on Q
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
68
 (defpkg :q
575
efb4a19ff530 color palettes, obj/query upgrades and q/sql parsing - successfully parsing SQL-SELECT
Richard Westhaver <ellis@rwest.io>
parents: 502
diff changeset
69
   (:use-reexport :q/proto :q/sql :q/dql))