Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

consted a var

  • Loading branch information...
commit 8f7ec498646c10d20797b87fa8156bc00495c27d 1 parent 968fcad
@petdance petdance authored
Showing with 4 additions and 5 deletions.
  1. +2 −3 src/dynoplibs/io.ops
  2. +2 −2 src/dynoplibs/trans.ops
View
5 src/dynoplibs/io.ops
@@ -1,5 +1,5 @@
/*
- * Copyright (C) 2010, Parrot Foundation.
+ * Copyright (C) 2010-2011, Parrot Foundation.
** io.ops
*/
@@ -182,8 +182,7 @@ op tell(out INT, invar PMC) :base_io {
op tell(out INT, out INT, invar PMC) :base_io {
if ($3) {
- PIOOFF_T pos;
- pos = Parrot_io_tell_handle(interp, $3);
+ const PIOOFF_T pos = Parrot_io_tell_handle(interp, $3);
$1 = (INTVAL)(pos >> 31);
$2 = (INTVAL)(pos & 0xffffffff);
}
View
4 src/dynoplibs/trans.ops
@@ -172,7 +172,7 @@ Set $1 to the base 2 logarithm of $2.
=cut
op log2(out NUM, in NUM) :base_math {
- FLOATVAL temp = log((FLOATVAL)2.0);
+ const FLOATVAL temp = log((FLOATVAL)2.0);
$1 = log((FLOATVAL)$2) / temp;
}
@@ -326,7 +326,7 @@ inline op pow(out NUM, in NUM, in INT) :base_core {
=head1 COPYRIGHT
-Copyright (C) 2010-2010, Parrot Foundation.
+Copyright (C) 2010-2011, Parrot Foundation.
=head1 LICENSE
Please sign in to comment.
Something went wrong with that request. Please try again.