version 1.43, 2013/03/16 11:45:07
|
version 1.45, 2013/04/01 15:29:33
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.1.13 |
RPL/2 (R) version 4.1.14 |
Copyright (C) 1989-2013 Dr. BERTRAND Joël |
Copyright (C) 1989-2013 Dr. BERTRAND Joël |
|
|
This file is part of RPL/2. |
This file is part of RPL/2. |
Line 190 depassement_puissance(integer8 *a, integ
|
Line 190 depassement_puissance(integer8 *a, integ
|
|
|
logical1 depassement; |
logical1 depassement; |
|
|
unsigned_integer8 r; |
integer8 r; |
|
|
if ((*b) < 0) |
if ((*b) < 0) |
{ |
{ |