Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

CArray[CArray[int8]] fails type check #4895

Open
p6rt opened this issue Dec 23, 2015 · 3 comments
Open

CArray[CArray[int8]] fails type check #4895

p6rt opened this issue Dec 23, 2015 · 3 comments

Comments

@p6rt
Copy link

p6rt commented Dec 23, 2015

Migrated from rt.perl.org#127001 (status was 'open')

Searchable as RT127001$

@p6rt
Copy link
Author

p6rt commented Dec 23, 2015

From alex.hartmaier@gmail.com

I wasn't able to come up with a failing test case as scripts aren't precompiled and I was told that it might have something to do with that.

When running t/45-oracle.t from https://github.com/abraxxa/DBIish using perl6 -Ilib t/45-oracle-common.t the following failure occurs​:

# Testing DBDish​::Oracle
1..70
ok 1 - Install driver
ok 2 - DBDish​::Oracle version 0.01
ok 3 - connect to XE
ok 4 - drop table gave an expected error (did a previous test not clean up?)
ok 5 - do​: create table nom
ok 6 - # SKIP err after successful create should be 0
ok 7 - errstr after successful create should be false
ok 8 - insert without parameters called from do
ok 9 - # SKIP $dbh.rows not implemented
ok 10 - prepare an insert command with one string parameter
ok 11 - execute one with one string parameter
ok 12 - execute one with one string parameter should return 1 row affected
ok 13 - $sth.rows for execute one with one string parameter should report 1 row affected
ok 14 - prepare an insert command with one integer parameter
ok 15 - execute one with one integer parameter
ok 16 - execute one with one integer parameter should return 1 row affected
ok 17 - $sth.rows for execute one with one integer parameter should report 1 row affected
ok 18 - prepare an insert command with one float parameter
ok 19 - execute one with one float parameter
ok 20 - execute one with one float parameter should return 1 row affected
ok 21 - $sth.rows for execute one with one float parameter should report 1 row affected
ok 22 - prepare an insert command with parameters
ok 23 - execute twice with parameters
ok 24 - # SKIP $dbh.rows not implemented
ok 25 - # SKIP $sth.bind_param_array() and $sth.execute_array() not implemented
ok 26 - # SKIP $sth.bind_param_array() and $sth.execute_array() not implemented
ok 27 - prepare a select command without parameters
ok 28 - execute a prepared select statement without parameters
ok 29 - fetchall_arrayref returns 6 rows
ok 30 - selected data matches what was written
ok 31 - Test the type of a Str field
ok 32 - Test the type of an Int field
not ok 33 - Test the type of a Float like field# TODO What type do we want to return for numeric?

# Failed test 'Test the type of a Float like field'
# at EVAL_0 line 178
Type check failed in assignment to $col_namep; expected NativeCall​::Types​::CArray[NativeCall​::Types​::CArray[int8]] but got NativeCall​::Types​::CArray[NativeCall​::Types​::CArray[int8]].new
  in block at /home/ahartmai/perl6/git/DBIish/lib/DBDish/Oracle/StatementHandle.pm6​:494
  in method column_names at /home/ahartmai/perl6/git/DBIish/lib/DBDish/Oracle/StatementHandle.pm6​:484
  in method _row at /home/ahartmai/perl6/git/DBIish/lib/DBDish/Oracle/StatementHandle.pm6​:460
  in method row at /home/ahartmai/perl6/git/DBIish/lib/DBDish/Role/StatementHandle.pm6​:28
  in block <unit> at EVAL_0​:180
  in block <unit> at t/45-oracle-common.t​:39

perl6 was rakudobrewed from now, perl6​::version=2015.11-756-g82e6ca2.

@p6rt
Copy link
Author

p6rt commented Jan 5, 2016

From alex.hartmaier@gmail.com

adding
no precompilation;

to DBDish​::Oracle​::StatementHandle works around the problem so the suspicion on IRC it's related to that seems to be true.

@p6rt
Copy link
Author

p6rt commented Jan 5, 2016

The RT System itself - Status changed from 'new' to 'open'

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Projects
None yet
Development

No branches or pull requests

1 participant