Changeset 1037


Ignore:
Timestamp:
Jul 18, 2003, 3:28:39 PM (17 years ago)
Author:
luba
Message:
  • test for "+" function with long numbers
Location:
to-imperative/trunk/samples/Arithm
Files:
1 added
2 edited

Legend:

Unmodified
Added
Removed
  • to-imperative/trunk/samples/Arithm/add.out

    r842 r1037  
    115
     22147483648
     32147483646
     4-2147483646
     5-2147483648
    26-2147483647
     72147483646
     8-21474836484
     921474836484
     10-21474836466
     1121474836466
     12-21474836460
     1321474836460
     14-2147483647
     152147483647
     16-42949672930
     170
     1842949672930
     19-2147483644364861997
     202147483644364861997
  • to-imperative/trunk/samples/Arithm/add.rf

    r719 r1037  
    22
    33Main =
    4   <PrintLN <"+" 2 3>>,
    5   <PrintLN <"+" -2147483646 -1>>;
     4  <PrintLN <"+" 2 3>>, /* два коротких, получаем короткое */
     5  <PrintLN <"+" 1 2147483647>>, /* два коротких, получаем длинное
     6                                   1 + INTPTR_MAX */
     7  <PrintLN <"+" -1 2147483647>>, /* два коротких, получаем длинное
     8                                    1 - INTPTR_MAX */
     9  <PrintLN <"+" -2147483647 1>>, /* два коротких, получаем длинное
     10                                    INTPTR_MIN + 1 */
     11  <PrintLN <"+" -2147483647 -1>>, /* два коротких, получаем длинное
     12                                     INTPTR_MIN - 1 */
    613
     14  <PrintLN <"+" 2 -2147483649>>, /* короткое и длинное, получаем короткое */
     15  <PrintLN <"+" -2 2147483648>>, /* короткое и длинное, получаем короткое */
     16
     17  <PrintLN <"+" -2 -21474836482>>, /* короткое и длинное, получаем длинное */
     18  <PrintLN <"+" 2 21474836482>>, /* короткое и длинное, получаем длинное */
     19
     20  <PrintLN <"+" -21474836465 -1>>, /* длинное и короткое, получаем длинное */
     21  <PrintLN <"+" 21474836465 1>>, /* длинное и короткое, получаем длинное */
     22
     23  <PrintLN <"+" -21474836465 5 >>, /* длинное и короткое, получаем длинное */
     24  <PrintLN <"+" 21474836465 -5>>, /* длинное и короткое, получаем длинное */
     25
     26  <PrintLN <"+" -2147483649 2 >>, /* длинное и короткое, получаем короткое */
     27  <PrintLN <"+" 2147483649 -2 >>, /* длинное и короткое, получаем короткое */
     28
     29  <PrintLN <"+" -21474836465  -21474836465>>, /* два длинных,
     30                                                 получаем длинное */
     31
     32  <PrintLN <"+" -21474836465  21474836465>>, /* два длинных,
     33                                                 получаем короткое */
     34  <PrintLN <"+" 21474836465  21474836465>>, /* два длинных,
     35                                                 получаем длинное */
     36
     37  <PrintLN <"+" -2147483646512345645  2147483648>>, /* два длинных,
     38                                                       получаем длинное */
     39  <PrintLN <"+" 2147483646512345645  -2147483648>>; /* два длинных,
     40                                                       получаем длинное */
     41
Note: See TracChangeset for help on using the changeset viewer.