Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
add some missing :D markers on Int ops, masak++
  • Loading branch information
moritz committed Oct 5, 2011
1 parent ff78b5b commit d3e6519
Showing 1 changed file with 8 additions and 8 deletions.
16 changes: 8 additions & 8 deletions src/core/Int.pm
Expand Up @@ -72,35 +72,35 @@ multi postfix:<-->(Int:D \$a is rw) { # XXX
$b
}

multi prefix:<->(Int \$a) {
multi prefix:<->(Int:D \$a) {
nqp::p6box_i(nqp::neg_i(nqp::unbox_i($a)))
}

multi prefix:<abs>(Int \$a) {
multi prefix:<abs>(Int:D \$a) {
nqp::p6box_i(nqp::abs_i(nqp::unbox_i($a)))
}

multi infix:<+>(Int \$a, Int \$b) {
multi infix:<+>(Int:D \$a, Int:D \$b) {
nqp::p6box_i(nqp::add_i(nqp::unbox_i($a), nqp::unbox_i($b)))
}

multi infix:<->(Int \$a, Int \$b) {
multi infix:<->(Int:D \$a, Int:D \$b) {
nqp::p6box_i(nqp::sub_i(nqp::unbox_i($a), nqp::unbox_i($b)))
}

multi infix:<*>(Int \$a, Int \$b) {
multi infix:<*>(Int:D \$a, Int:D \$b) {
nqp::p6box_i(nqp::mul_i(nqp::unbox_i($a), nqp::unbox_i($b)))
}

multi infix:<div>(Int \$a, Int \$b) {
multi infix:<div>(Int:D \$a, Int:D \$b) {
nqp::p6box_i(nqp::div_i(nqp::unbox_i($a), nqp::unbox_i($b)))
}

multi infix:<%>(Int \$a, Int \$b) {
multi infix:<%>(Int:D \$a, Int:D \$b) {
nqp::p6box_i(nqp::mod_i(nqp::unbox_i($a), nqp::unbox_i($b)))
}

multi infix:<**>(Int \$a, Int \$b) {
multi infix:<**>(Int:D \$a, Int:D \$b) {
if $b >= 0 {
nqp::p6box_i(nqp::pow_n(nqp::unbox_i($a), nqp::unbox_i($b)))
} else {
Expand Down

0 comments on commit d3e6519

Please sign in to comment.