+(defsql |sql-~* ANY| (:symbol "~* ANY") (&rest rest)
+ "This is the postgres regex match any in an array"
+ (make-instance 'sql-relational-exp
+ :operator '|~* ANY| :sub-expressions rest))
+
+(defsql sql-array (:symbol "array") (&rest rest)
+ "This is the postgres regex match any in an array"
+ (make-instance 'sql-array-exp
+ :operator 'array :sub-expressions rest))
+