line |
true |
false |
branch |
123
|
1 |
703 |
if $self->column($name)
|
138
|
3 |
2 |
unless &blessed($col)
|
141
|
1 |
4 |
if (my $schema = $self->schema)
|
151
|
2 |
2 |
if $k->object($name)
|
179
|
326 |
1 |
@_ ? :
|
186
|
364 |
15 |
&blessed($_) ? :
|
187
|
1 |
378 |
unless $self->column($name)
|
195
|
1 |
324 |
if $self->has_candidate_key(@cols)
|
205
|
7 |
1 |
@_ ? :
|
212
|
4 |
3 |
&blessed($_) ? :
|
213
|
1 |
6 |
unless $self->column($name)
|
225
|
5 |
1 |
if $idx >= 0
|
234
|
329 |
1 |
@_ ? :
|
241
|
378 |
5 |
&blessed($_) ? :
|
242
|
1 |
382 |
unless $self->column($name)
|
253
|
3 |
325 |
if &any(sub {
$_->is_same_as($set);
}
, $self->_keys)
|
287
|
0 |
6 |
unless my $col = $self->column($name)
|
297
|
1 |
1 |
@_ ? :
|