[BACK]Return to 388-sql.html CVS log [TXT] [DIR] Up to [parser3project] / parser3 / tests

Diff for /parser3/tests/388-sql.html between versions 1.16 and 1.18

version 1.16, 2024/09/27 23:37:58 version 1.18, 2024/09/28 09:10:06
Line 1 Line 1
 @main[]  @auto[]
   
 $path[^os[Release/;.libs/lib]]  $path[^os[Release/;.libs/lib]]
 $ext[^os[dll;so]]  $ext[^os[dll;so]]
Line 14  pgsql ../../sql/pgsql/${path}parser3pgsq Line 14  pgsql ../../sql/pgsql/${path}parser3pgsq
 $sql[sqlite]  $sql[sqlite]
 $ignore[^SQL.drivers.locate[protocol;$sql]]  $ignore[^SQL.drivers.locate[protocol;$sql]]
   
   @prepare-data[]
           $ignore[^try-catch{ ^void:sql{drop table pets} }]
   
           ^void:sql{create table pets (pet varchar(128), food varchar(128), aggressive varchar(128), weigth varchar(128))}
   
           ^void:sql{insert into pets values
                   ('cat', 'milk', '^taint['very']', 5),
                   ('dog', 'bone', '^taint["never"]', 10),
                   ('hamster', 'grain', null, 1),
                   ('parrot', 'grain', 'alwayws', 1)
           }
   
   @main[]
   
 ^connect[$SQL.drivers.connect]{  ^connect[$SQL.drivers.connect]{
   
         1. 2 + 2 = ^string:sql{select 2+2}          1. 2 + 2 = ^string:sql{select 2+2}
Line 21  $ignore[^SQL.drivers.locate[protocol;$sq Line 35  $ignore[^SQL.drivers.locate[protocol;$sq
   
         2. void          2. void
   
         2.0 $ignore[^try-catch{ ^void:sql{drop table pets} }]          2.1 ^prepare-data[]
   
         2.1 ^void:sql{create table pets (pet varchar(128), food varchar(128), aggressive varchar(128), weigth varchar(128))}  
   
         2.2 ^void:sql{insert into pets values  
                 ('cat', 'milk', '^taint['very']', 5),  
                 ('dog', 'bone', '^taint["never"]', 10),  
                 ('parrot', 'grain', 'alwayws', 1)  
            }  
   
         2.3 ^try-catch{ ^void:sql{select * from pets} }          2.3 ^try-catch{ ^void:sql{select * from pets} }
         2.4 ^try-catch{ ^void:sql{query}[ $.unknown[yes] ] }          2.4 ^try-catch{ ^void:sql{query}[ $.unknown[yes] ] }
Line 71  $ignore[^SQL.drivers.locate[protocol;$sq Line 77  $ignore[^SQL.drivers.locate[protocol;$sq
   
         4.7 ^h[select pet from pets]          4.7 ^h[select pet from pets]
   
         4.8 ^h[select '0' as key, pet from pets; $.type[table] $.distinct(true) ]          4.7.1 ^h[select aggressive from pets; $.type[table] ]
   
           4.8 ^h[select food as key, pet from pets; $.type[table] $.distinct(true) ]
   
         4.9 ^h[select '0' as key, pet from pets; $.type[string] $.distinct(true) ]          4.9 ^h[select food as key, pet from pets; $.type[string] $.distinct(true) ]
   
   
         5. table          5. table
Line 97  $ignore[^SQL.drivers.locate[protocol;$sq Line 105  $ignore[^SQL.drivers.locate[protocol;$sq
   
         6.4 ^try-catch{ ^f[select aggressive from pets; $.limit(0) ] }          6.4 ^try-catch{ ^f[select aggressive from pets; $.limit(0) ] }
   
         6.5 ^try-catch{ ^f[select 1 from pets] } - bug!          6.5 ^try-catch{ ^f[select 1 from pets; $.limit(3) ] } - bug!
   
         6.6 ^try-catch{ ^f[select 1,2 from pets] }          6.6 ^try-catch{ ^f[select 1,2 from pets] }
   
Removed from v.1.16  
changed lines
  Added in v.1.18

E-mail: