LHS of as is interpreted as ident so this is more correct

diff --git a/xt/clauses.t b/xt/clauses.t
index ce75f17..a7d948d 100644 (file)
--- a/xt/clauses.t
+++ b/xt/clauses.t
@@ -165,8 +165,8 @@ is_same_sql(
 }
 
 ($sql) = $sqlac->select({
-  select => { -as => [ 1, 'x' ] },
-  union => { -select => { select => { -as => [ 2, 'x' ] } } },
+  select => { -as => [ \1, 'x' ] },
+  union => { -select => { select => { -as => [ \2, 'x' ] } } },
   order_by => { -desc => 'x' },
 });