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 | 1 | ;;; q/pkg.lisp --- Q Lang Packages |
2 | ||
3 | ;; |
|
4 | ||
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 | 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 | 10 | |
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 | 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 | 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 | 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 | 64 | |
65 | ;; (defpackage :q/e) |
|
66 | ||
67 | (in-package :std-user) |
|
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)) |