code reorg

This commit is contained in:
jackfoxy 2023-05-02 10:33:46 -07:00
parent 9f20d86d26
commit 7b6b66b618
2 changed files with 555 additions and 553 deletions

File diff suppressed because it is too large Load Diff

View File

@ -26,7 +26,7 @@
$: $:
%value-literal-list %value-literal-list
value-type=@tas value-type=@tas
value-list=@t :: (crip ; delimited tape) value-list=@t
== ==
+$ ordered-column +$ ordered-column
$: $:
@ -167,7 +167,7 @@
columns=(list selected-column) columns=(list selected-column)
== ==
+$ selected-column +$ selected-column
$%(qualified-column qualified-object selected-aggregate selected-value) :: ) :: scalar-function or selected-scalar fish-loop $%(qualified-column qualified-object selected-aggregate selected-value) :: scalar-function or selected-scalar) fish-loop
+$ selected-aggregate +$ selected-aggregate
$: $:
%selected-aggregate %selected-aggregate
@ -215,7 +215,7 @@
== ==
+$ query +$ query
$: $:
%query :: what we've all been waiting for %query
ctes=(list cte-query) ctes=(list cte-query)
simple-query simple-query
(list operated-query) (list operated-query)
@ -282,7 +282,7 @@
$: $:
%create-index %create-index
name=@t name=@t
object-name=qualified-object :: because index can be over table or view object-name=qualified-object
is-unique=? is-unique=?
is-clustered=? is-clustered=?
columns=(list ordered-column) columns=(list ordered-column)
@ -300,7 +300,7 @@
$: $:
%create-trigger %create-trigger
name=@t name=@t
object=qualified-object :: because trigger can be over table or view object=qualified-object
enabled=? enabled=?
== ==
+$ create-type $:([%create-type name=@t]) +$ create-type $:([%create-type name=@t])
@ -308,7 +308,7 @@
$: $:
%create-view %create-view
view=qualified-object view=qualified-object
query=query :: awaiting construction of query query=query
== ==
:: ::
:: drop ASTs :: drop ASTs
@ -318,7 +318,7 @@
$: $:
%drop-index %drop-index
name=@t name=@t
object=qualified-object :: because index can be over table or view object=qualified-object
== ==
+$ drop-namespace $:([%drop-namespace database-name=@t name=@t force=?]) +$ drop-namespace $:([%drop-namespace database-name=@t name=@t force=?])
+$ drop-table +$ drop-table
@ -331,7 +331,7 @@
$: $:
%drop-trigger %drop-trigger
name=@t name=@t
object=qualified-object :: because trigger can be over table or view object=qualified-object
== ==
+$ drop-type $:([%drop-type name=@t]) +$ drop-type $:([%drop-type name=@t])
+$ drop-view +$ drop-view
@ -356,7 +356,7 @@
%alter-namespace %alter-namespace
database-name=@t database-name=@t
source-namespace=@t source-namespace=@t
object-type=object-type :: because it can be a table or view object-type=object-type
target-namespace=@t target-namespace=@t
target-name=@t target-name=@t
== ==
@ -374,14 +374,14 @@
$: $:
%alter-trigger %alter-trigger
name=@t name=@t
object=qualified-object :: because trigger can be over table or view object=qualified-object
enabled=? enabled=?
== ==
+$ alter-view +$ alter-view
$: $:
%alter-view %alter-view
view=qualified-object view=qualified-object
query=query :: awaiting construction of query query=query
== ==
:: ::
:: permissions :: permissions