Advertisement
morty0505

Untitled

Dec 4th, 2016
311
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. # Code file created by Pascal2016 compiler 2016-12-04 15:19:33
  2.        .globl  main                    
  3. main:
  4.         call    prog$operatortest_1     # Start program
  5.         movl    $0,%eax                 # Set status 0 and
  6.         ret                             # terminate the program
  7. proc$test_3:
  8.         enter   $32,$3                  # Start of test
  9.         movl    $110,%eax               # 'n'
  10.         pushl   %eax                    # Push next param.
  11.         call    write_char              
  12.         addl    $4,%esp                 # Pop param.
  13.         movl    $111,%eax               # 'o'
  14.         pushl   %eax                    # Push next param.
  15.         call    write_char              
  16.         addl    $4,%esp                 # Pop param.
  17.         movl    $116,%eax               # 't'
  18.         pushl   %eax                    # Push next param.
  19.         call    write_char              
  20.         addl    $4,%esp                 # Pop param.
  21.         movl    $32,%eax                # ' '
  22.         pushl   %eax                    # Push next param.
  23.         call    write_char              
  24.         addl    $4,%esp                 # Pop param.
  25.         movl    -12(%ebp),%edx          
  26.         movl    8(%edx),%eax            # x
  27.         pushl   %eax                    # Push next param.
  28.         call    write_bool              
  29.         addl    $4,%esp                 # Pop param.
  30.         movl    $32,%eax                # ' '
  31.         pushl   %eax                    # Push next param.
  32.         call    write_char              
  33.         addl    $4,%esp                 # Pop param.
  34.         movl    $61,%eax                # '='
  35.         pushl   %eax                    # Push next param.
  36.         call    write_char              
  37.         addl    $4,%esp                 # Pop param.
  38.         movl    $32,%eax                # ' '
  39.         pushl   %eax                    # Push next param.
  40.         call    write_char              
  41.         addl    $4,%esp                 # Pop param.
  42.         movl    -12(%ebp),%edx          
  43.         movl    8(%edx),%eax            # x
  44.         xorl    $0x1,%eax               # not
  45.         pushl   %eax                    # Push next param.
  46.         call    write_bool              
  47.         addl    $4,%esp                 # Pop param.
  48.         movl    $10,%eax                # 10
  49.         pushl   %eax                    # Push next param.
  50.         call    write_char              
  51.         addl    $4,%esp                 # Pop param.
  52.         leave                           # End of test
  53.         ret                            
  54. proc$testunaryboolean_2:
  55.         enter   $32,$2                  # Start of testunaryboolean
  56.         movl    $0,%eax                 # 0
  57.         pushl   %eax                    # Push param #1.
  58.         call    proc$test_3            
  59.         addl    $4,%esp                 # Pop params.
  60.         movl    $1,%eax                 # 1
  61.         pushl   %eax                    # Push param #1.
  62.         call    proc$test_3            
  63.         addl    $4,%esp                 # Pop params.
  64.         leave                           # End of testunaryboolean
  65.         ret                            
  66. proc$test_5:
  67.         enter   $32,$3                  # Start of test
  68.         movl    -12(%ebp),%edx          
  69.         movl    8(%edx),%eax            # x
  70.         pushl   %eax                    # Push next param.
  71.         call    write_bool              
  72.         addl    $4,%esp                 # Pop param.
  73.         movl    $32,%eax                # ' '
  74.         pushl   %eax                    # Push next param.
  75.         call    write_char              
  76.         addl    $4,%esp                 # Pop param.
  77.         movl    $97,%eax                # 'a'
  78.         pushl   %eax                    # Push next param.
  79.         call    write_char              
  80.         addl    $4,%esp                 # Pop param.
  81.         movl    $110,%eax               # 'n'
  82.         pushl   %eax                    # Push next param.
  83.         call    write_char              
  84.         addl    $4,%esp                 # Pop param.
  85.         movl    $100,%eax               # 'd'
  86.         pushl   %eax                    # Push next param.
  87.         call    write_char              
  88.         addl    $4,%esp                 # Pop param.
  89.         movl    $32,%eax                # ' '
  90.         pushl   %eax                    # Push next param.
  91.         call    write_char              
  92.         addl    $4,%esp                 # Pop param.
  93.         movl    -12(%ebp),%edx          
  94.         movl    12(%edx),%eax           # y
  95.         pushl   %eax                    # Push next param.
  96.         call    write_bool              
  97.         addl    $4,%esp                 # Pop param.
  98.         movl    $32,%eax                # ' '
  99.         pushl   %eax                    # Push next param.
  100.         call    write_char              
  101.         addl    $4,%esp                 # Pop param.
  102.         movl    $61,%eax                # '='
  103.         pushl   %eax                    # Push next param.
  104.         call    write_char              
  105.         addl    $4,%esp                 # Pop param.
  106.         movl    $32,%eax                # ' '
  107.         pushl   %eax                    # Push next param.
  108.         call    write_char              
  109.         addl    $4,%esp                 # Pop param.
  110.         movl    -12(%ebp),%edx          
  111.         movl    8(%edx),%eax            # x
  112.         pushl   %eax                    
  113.         movl    -12(%ebp),%edx          
  114.         movl    12(%edx),%eax           # y
  115.         movl    %eax,%ecx              
  116.         popl    %eax                    
  117.         andl    %ecx,%eax               # and
  118.         pushl   %eax                    # Push next param.
  119.         call    write_bool              
  120.         addl    $4,%esp                 # Pop param.
  121.         movl    $10,%eax                # 10
  122.         pushl   %eax                    # Push next param.
  123.         call    write_char              
  124.         addl    $4,%esp                 # Pop param.
  125.         movl    -12(%ebp),%edx          
  126.         movl    8(%edx),%eax            # x
  127.         pushl   %eax                    # Push next param.
  128.         call    write_bool              
  129.         addl    $4,%esp                 # Pop param.
  130.         movl    $32,%eax                # ' '
  131.         pushl   %eax                    # Push next param.
  132.         call    write_char              
  133.         addl    $4,%esp                 # Pop param.
  134.         movl    $111,%eax               # 'o'
  135.         pushl   %eax                    # Push next param.
  136.         call    write_char              
  137.         addl    $4,%esp                 # Pop param.
  138.         movl    $114,%eax               # 'r'
  139.         pushl   %eax                    # Push next param.
  140.         call    write_char              
  141.         addl    $4,%esp                 # Pop param.
  142.         movl    $32,%eax                # ' '
  143.         pushl   %eax                    # Push next param.
  144.         call    write_char              
  145.         addl    $4,%esp                 # Pop param.
  146.         movl    -12(%ebp),%edx          
  147.         movl    12(%edx),%eax           # y
  148.         pushl   %eax                    # Push next param.
  149.         call    write_bool              
  150.         addl    $4,%esp                 # Pop param.
  151.         movl    $32,%eax                # ' '
  152.         pushl   %eax                    # Push next param.
  153.         call    write_char              
  154.         addl    $4,%esp                 # Pop param.
  155.         movl    $61,%eax                # '='
  156.         pushl   %eax                    # Push next param.
  157.         call    write_char              
  158.         addl    $4,%esp                 # Pop param.
  159.         movl    $32,%eax                # ' '
  160.         pushl   %eax                    # Push next param.
  161.         call    write_char              
  162.         addl    $4,%esp                 # Pop param.
  163.         movl    -12(%ebp),%edx          
  164.         movl    8(%edx),%eax            # x
  165.         pushl   %eax                    
  166.         movl    -12(%ebp),%edx          
  167.         movl    12(%edx),%eax           # y
  168.         movl    %eax,%ecx              
  169.         popl    %eax                    
  170.         orl     %ecx,%eax               # or
  171.         pushl   %eax                    # Push next param.
  172.         call    write_bool              
  173.         addl    $4,%esp                 # Pop param.
  174.         movl    $10,%eax                # 10
  175.         pushl   %eax                    # Push next param.
  176.         call    write_char              
  177.         addl    $4,%esp                 # Pop param.
  178.         leave                           # End of test
  179.         ret                            
  180. proc$testbinaryboolean_4:
  181.         enter   $32,$2                  # Start of testbinaryboolean
  182.         movl    $0,%eax                 # 0
  183.         pushl   %eax                    # Push param #2.
  184.         movl    $0,%eax                 # 0
  185.         pushl   %eax                    # Push param #1.
  186.         call    proc$test_5            
  187.         addl    $8,%esp                 # Pop params.
  188.         movl    $1,%eax                 # 1
  189.         pushl   %eax                    # Push param #2.
  190.         movl    $0,%eax                 # 0
  191.         pushl   %eax                    # Push param #1.
  192.         call    proc$test_5            
  193.         addl    $8,%esp                 # Pop params.
  194.         movl    $0,%eax                 # 0
  195.         pushl   %eax                    # Push param #2.
  196.         movl    $1,%eax                 # 1
  197.         pushl   %eax                    # Push param #1.
  198.         call    proc$test_5            
  199.         addl    $8,%esp                 # Pop params.
  200.         movl    $1,%eax                 # 1
  201.         pushl   %eax                    # Push param #2.
  202.         movl    $1,%eax                 # 1
  203.         pushl   %eax                    # Push param #1.
  204.         call    proc$test_5            
  205.         addl    $8,%esp                 # Pop params.
  206.         leave                           # End of testbinaryboolean
  207.         ret                            
  208. proc$test_7:
  209.         enter   $32,$3                  # Start of test
  210.         movl    $45,%eax                # '-'
  211.         pushl   %eax                    # Push next param.
  212.         call    write_char              
  213.         addl    $4,%esp                 # Pop param.
  214.         movl    $32,%eax                # ' '
  215.         pushl   %eax                    # Push next param.
  216.         call    write_char              
  217.         addl    $4,%esp                 # Pop param.
  218.         movl    -12(%ebp),%edx          
  219.         movl    8(%edx),%eax            # x
  220.         pushl   %eax                    # Push next param.
  221.         call    write_int              
  222.         addl    $4,%esp                 # Pop param.
  223.         movl    $32,%eax                # ' '
  224.         pushl   %eax                    # Push next param.
  225.         call    write_char              
  226.         addl    $4,%esp                 # Pop param.
  227.         movl    $61,%eax                # '='
  228.         pushl   %eax                    # Push next param.
  229.         call    write_char              
  230.         addl    $4,%esp                 # Pop param.
  231.         movl    $32,%eax                # ' '
  232.         pushl   %eax                    # Push next param.
  233.         call    write_char              
  234.         addl    $4,%esp                 # Pop param.
  235.         movl    -12(%ebp),%edx          
  236.         movl    8(%edx),%eax            # x
  237.         negl    %eax                    # - (prefix)
  238.         pushl   %eax                    # Push next param.
  239.         call    write_int              
  240.         addl    $4,%esp                 # Pop param.
  241.         movl    $10,%eax                # 10
  242.         pushl   %eax                    # Push next param.
  243.         call    write_char              
  244.         addl    $4,%esp                 # Pop param.
  245.         movl    $43,%eax                # '+'
  246.         pushl   %eax                    # Push next param.
  247.         call    write_char              
  248.         addl    $4,%esp                 # Pop param.
  249.         movl    $32,%eax                # ' '
  250.         pushl   %eax                    # Push next param.
  251.         call    write_char              
  252.         addl    $4,%esp                 # Pop param.
  253.         movl    -12(%ebp),%edx          
  254.         movl    8(%edx),%eax            # x
  255.         pushl   %eax                    # Push next param.
  256.         call    write_int              
  257.         addl    $4,%esp                 # Pop param.
  258.         movl    $32,%eax                # ' '
  259.         pushl   %eax                    # Push next param.
  260.         call    write_char              
  261.         addl    $4,%esp                 # Pop param.
  262.         movl    $61,%eax                # '='
  263.         pushl   %eax                    # Push next param.
  264.         call    write_char              
  265.         addl    $4,%esp                 # Pop param.
  266.         movl    $32,%eax                # ' '
  267.         pushl   %eax                    # Push next param.
  268.         call    write_char              
  269.         addl    $4,%esp                 # Pop param.
  270.         movl    -12(%ebp),%edx          
  271.         movl    8(%edx),%eax            # x
  272.         pushl   %eax                    # Push next param.
  273.         call    write_int              
  274.         addl    $4,%esp                 # Pop param.
  275.         movl    $10,%eax                # 10
  276.         pushl   %eax                    # Push next param.
  277.         call    write_char              
  278.         addl    $4,%esp                 # Pop param.
  279.         leave                           # End of test
  280.         ret                            
  281. proc$testunarynumeric_6:
  282.         enter   $32,$2                  # Start of testunarynumeric
  283.         movl    $17,%eax                # 17
  284.         pushl   %eax                    # Push param #1.
  285.         call    proc$test_7            
  286.         addl    $4,%esp                 # Pop params.
  287.         movl    $11,%eax                # 11
  288.         negl    %eax                    # - (prefix)
  289.         pushl   %eax                    # Push param #1.
  290.         call    proc$test_7            
  291.         addl    $4,%esp                 # Pop params.
  292.         movl    $0,%eax                 # 0
  293.         pushl   %eax                    # Push param #1.
  294.         call    proc$test_7            
  295.         addl    $4,%esp                 # Pop params.
  296.         leave                           # End of testunarynumeric
  297.         ret                            
  298. proc$test_9:
  299.         enter   $32,$3                  # Start of test
  300.         movl    -12(%ebp),%edx          
  301.         movl    8(%edx),%eax            # x
  302.         pushl   %eax                    # Push next param.
  303.         call    write_int              
  304.         addl    $4,%esp                 # Pop param.
  305.         movl    $32,%eax                # ' '
  306.         pushl   %eax                    # Push next param.
  307.         call    write_char              
  308.         addl    $4,%esp                 # Pop param.
  309.         movl    $43,%eax                # '+'
  310.         pushl   %eax                    # Push next param.
  311.         call    write_char              
  312.         addl    $4,%esp                 # Pop param.
  313.         movl    $32,%eax                # ' '
  314.         pushl   %eax                    # Push next param.
  315.         call    write_char              
  316.         addl    $4,%esp                 # Pop param.
  317.         movl    -12(%ebp),%edx          
  318.         movl    12(%edx),%eax           # y
  319.         pushl   %eax                    # Push next param.
  320.         call    write_int              
  321.         addl    $4,%esp                 # Pop param.
  322.         movl    $32,%eax                # ' '
  323.         pushl   %eax                    # Push next param.
  324.         call    write_char              
  325.         addl    $4,%esp                 # Pop param.
  326.         movl    $61,%eax                # '='
  327.         pushl   %eax                    # Push next param.
  328.         call    write_char              
  329.         addl    $4,%esp                 # Pop param.
  330.         movl    $32,%eax                # ' '
  331.         pushl   %eax                    # Push next param.
  332.         call    write_char              
  333.         addl    $4,%esp                 # Pop param.
  334.         movl    -12(%ebp),%edx          
  335.         movl    8(%edx),%eax            # x
  336.         pushl   %eax                    
  337.         movl    -12(%ebp),%edx          
  338.         movl    12(%edx),%eax           # y
  339.         movl    %eax,%ecx              
  340.         popl    %eax                    
  341.         addl    %ecx,%eax               # +
  342.         pushl   %eax                    # Push next param.
  343.         call    write_int              
  344.         addl    $4,%esp                 # Pop param.
  345.         movl    $10,%eax                # 10
  346.         pushl   %eax                    # Push next param.
  347.         call    write_char              
  348.         addl    $4,%esp                 # Pop param.
  349.         movl    -12(%ebp),%edx          
  350.         movl    8(%edx),%eax            # x
  351.         pushl   %eax                    # Push next param.
  352.         call    write_int              
  353.         addl    $4,%esp                 # Pop param.
  354.         movl    $32,%eax                # ' '
  355.         pushl   %eax                    # Push next param.
  356.         call    write_char              
  357.         addl    $4,%esp                 # Pop param.
  358.         movl    $45,%eax                # '-'
  359.         pushl   %eax                    # Push next param.
  360.         call    write_char              
  361.         addl    $4,%esp                 # Pop param.
  362.         movl    $32,%eax                # ' '
  363.         pushl   %eax                    # Push next param.
  364.         call    write_char              
  365.         addl    $4,%esp                 # Pop param.
  366.         movl    -12(%ebp),%edx          
  367.         movl    12(%edx),%eax           # y
  368.         pushl   %eax                    # Push next param.
  369.         call    write_int              
  370.         addl    $4,%esp                 # Pop param.
  371.         movl    $32,%eax                # ' '
  372.         pushl   %eax                    # Push next param.
  373.         call    write_char              
  374.         addl    $4,%esp                 # Pop param.
  375.         movl    $61,%eax                # '='
  376.         pushl   %eax                    # Push next param.
  377.         call    write_char              
  378.         addl    $4,%esp                 # Pop param.
  379.         movl    $32,%eax                # ' '
  380.         pushl   %eax                    # Push next param.
  381.         call    write_char              
  382.         addl    $4,%esp                 # Pop param.
  383.         movl    -12(%ebp),%edx          
  384.         movl    8(%edx),%eax            # x
  385.         pushl   %eax                    
  386.         movl    -12(%ebp),%edx          
  387.         movl    12(%edx),%eax           # y
  388.         movl    %eax,%ecx              
  389.         popl    %eax                    
  390.         subl    %ecx,%eax               # -
  391.         pushl   %eax                    # Push next param.
  392.         call    write_int              
  393.         addl    $4,%esp                 # Pop param.
  394.         movl    $10,%eax                # 10
  395.         pushl   %eax                    # Push next param.
  396.         call    write_char              
  397.         addl    $4,%esp                 # Pop param.
  398.         movl    -12(%ebp),%edx          
  399.         movl    8(%edx),%eax            # x
  400.         pushl   %eax                    # Push next param.
  401.         call    write_int              
  402.         addl    $4,%esp                 # Pop param.
  403.         movl    $32,%eax                # ' '
  404.         pushl   %eax                    # Push next param.
  405.         call    write_char              
  406.         addl    $4,%esp                 # Pop param.
  407.         movl    $42,%eax                # '*'
  408.         pushl   %eax                    # Push next param.
  409.         call    write_char              
  410.         addl    $4,%esp                 # Pop param.
  411.         movl    $32,%eax                # ' '
  412.         pushl   %eax                    # Push next param.
  413.         call    write_char              
  414.         addl    $4,%esp                 # Pop param.
  415.         movl    -12(%ebp),%edx          
  416.         movl    12(%edx),%eax           # y
  417.         pushl   %eax                    # Push next param.
  418.         call    write_int              
  419.         addl    $4,%esp                 # Pop param.
  420.         movl    $32,%eax                # ' '
  421.         pushl   %eax                    # Push next param.
  422.         call    write_char              
  423.         addl    $4,%esp                 # Pop param.
  424.         movl    $61,%eax                # '='
  425.         pushl   %eax                    # Push next param.
  426.         call    write_char              
  427.         addl    $4,%esp                 # Pop param.
  428.         movl    $32,%eax                # ' '
  429.         pushl   %eax                    # Push next param.
  430.         call    write_char              
  431.         addl    $4,%esp                 # Pop param.
  432.         movl    -12(%ebp),%edx          
  433.         movl    8(%edx),%eax            # x
  434.         pushl   %eax                    
  435.         movl    -12(%ebp),%edx          
  436.         movl    12(%edx),%eax           # y
  437.         movl    %eax,%ecx              
  438.         popl    %eax                    
  439.         imull   %ecx,%eax               # *
  440.         pushl   %eax                    # Push next param.
  441.         call    write_int              
  442.         addl    $4,%esp                 # Pop param.
  443.         movl    $10,%eax                # 10
  444.         pushl   %eax                    # Push next param.
  445.         call    write_char              
  446.         addl    $4,%esp                 # Pop param.
  447.                                        # Start if-statement
  448.         movl    -12(%ebp),%edx          
  449.         movl    12(%edx),%eax           # y
  450.         pushl   %eax                    
  451.         movl    $0,%eax                 # 0
  452.         popl    %ecx                    
  453.         cmpl    %eax,%ecx              
  454.         movl    $0,%eax                
  455.         setne   %al                     # Test <>
  456.         cmpl    $0,%eax                
  457.         je      .L0010                  
  458.         movl    -12(%ebp),%edx          
  459.         movl    8(%edx),%eax            # x
  460.         pushl   %eax                    # Push next param.
  461.         call    write_int              
  462.         addl    $4,%esp                 # Pop param.
  463.         movl    $32,%eax                # ' '
  464.         pushl   %eax                    # Push next param.
  465.         call    write_char              
  466.         addl    $4,%esp                 # Pop param.
  467.         movl    $100,%eax               # 'd'
  468.         pushl   %eax                    # Push next param.
  469.         call    write_char              
  470.         addl    $4,%esp                 # Pop param.
  471.         movl    $105,%eax               # 'i'
  472.         pushl   %eax                    # Push next param.
  473.         call    write_char              
  474.         addl    $4,%esp                 # Pop param.
  475.         movl    $118,%eax               # 'v'
  476.         pushl   %eax                    # Push next param.
  477.         call    write_char              
  478.         addl    $4,%esp                 # Pop param.
  479.         movl    $32,%eax                # ' '
  480.         pushl   %eax                    # Push next param.
  481.         call    write_char              
  482.         addl    $4,%esp                 # Pop param.
  483.         movl    -12(%ebp),%edx          
  484.         movl    12(%edx),%eax           # y
  485.         pushl   %eax                    # Push next param.
  486.         call    write_int              
  487.         addl    $4,%esp                 # Pop param.
  488.         movl    $32,%eax                # ' '
  489.         pushl   %eax                    # Push next param.
  490.         call    write_char              
  491.         addl    $4,%esp                 # Pop param.
  492.         movl    $61,%eax                # '='
  493.         pushl   %eax                    # Push next param.
  494.         call    write_char              
  495.         addl    $4,%esp                 # Pop param.
  496.         movl    $32,%eax                # ' '
  497.         pushl   %eax                    # Push next param.
  498.         call    write_char              
  499.         addl    $4,%esp                 # Pop param.
  500.         movl    -12(%ebp),%edx          
  501.         movl    8(%edx),%eax            # x
  502.         pushl   %eax                    
  503.         movl    -12(%ebp),%edx          
  504.         movl    12(%edx),%eax           # y
  505.         movl    %eax,%ecx              
  506.         popl    %eax                    
  507.         cdq                            
  508.         idivl   %ecx                    # /
  509.         pushl   %eax                    # Push next param.
  510.         call    write_int              
  511.         addl    $4,%esp                 # Pop param.
  512.         movl    $10,%eax                # 10
  513.         pushl   %eax                    # Push next param.
  514.         call    write_char              
  515.         addl    $4,%esp                 # Pop param.
  516.         movl    -12(%ebp),%edx          
  517.         movl    8(%edx),%eax            # x
  518.         pushl   %eax                    # Push next param.
  519.         call    write_int              
  520.         addl    $4,%esp                 # Pop param.
  521.         movl    $32,%eax                # ' '
  522.         pushl   %eax                    # Push next param.
  523.         call    write_char              
  524.         addl    $4,%esp                 # Pop param.
  525.         movl    $109,%eax               # 'm'
  526.         pushl   %eax                    # Push next param.
  527.         call    write_char              
  528.         addl    $4,%esp                 # Pop param.
  529.         movl    $111,%eax               # 'o'
  530.         pushl   %eax                    # Push next param.
  531.         call    write_char              
  532.         addl    $4,%esp                 # Pop param.
  533.         movl    $100,%eax               # 'd'
  534.         pushl   %eax                    # Push next param.
  535.         call    write_char              
  536.         addl    $4,%esp                 # Pop param.
  537.         movl    $32,%eax                # ' '
  538.         pushl   %eax                    # Push next param.
  539.         call    write_char              
  540.         addl    $4,%esp                 # Pop param.
  541.         movl    -12(%ebp),%edx          
  542.         movl    12(%edx),%eax           # y
  543.         pushl   %eax                    # Push next param.
  544.         call    write_int              
  545.         addl    $4,%esp                 # Pop param.
  546.         movl    $32,%eax                # ' '
  547.         pushl   %eax                    # Push next param.
  548.         call    write_char              
  549.         addl    $4,%esp                 # Pop param.
  550.         movl    $61,%eax                # '='
  551.         pushl   %eax                    # Push next param.
  552.         call    write_char              
  553.         addl    $4,%esp                 # Pop param.
  554.         movl    $32,%eax                # ' '
  555.         pushl   %eax                    # Push next param.
  556.         call    write_char              
  557.         addl    $4,%esp                 # Pop param.
  558.         movl    -12(%ebp),%edx          
  559.         movl    8(%edx),%eax            # x
  560.         pushl   %eax                    
  561.         movl    -12(%ebp),%edx          
  562.         movl    12(%edx),%eax           # y
  563.         movl    %eax,%ecx              
  564.         popl    %eax                    
  565.         cdq                            
  566.         idivl   %ecx                    
  567.         movl    %edx,%eax               # mod
  568.         pushl   %eax                    # Push next param.
  569.         call    write_int              
  570.         addl    $4,%esp                 # Pop param.
  571.         movl    $10,%eax                # 10
  572.         pushl   %eax                    # Push next param.
  573.         call    write_char              
  574.         addl    $4,%esp                 # Pop param.
  575. .L0010:
  576.                                        # End if-statement
  577.         leave                           # End of test
  578.         ret                            
  579. proc$testbinarynumeric_8:
  580.         enter   $32,$2                  # Start of testbinarynumeric
  581.         movl    $17,%eax                # 17
  582.         pushl   %eax                    # Push param #2.
  583.         movl    $17,%eax                # 17
  584.         pushl   %eax                    # Push param #1.
  585.         call    proc$test_9            
  586.         addl    $8,%esp                 # Pop params.
  587.         movl    $11,%eax                # 11
  588.         negl    %eax                    # - (prefix)
  589.         pushl   %eax                    # Push param #2.
  590.         movl    $17,%eax                # 17
  591.         pushl   %eax                    # Push param #1.
  592.         call    proc$test_9            
  593.         addl    $8,%esp                 # Pop params.
  594.         movl    $0,%eax                 # 0
  595.         pushl   %eax                    # Push param #2.
  596.         movl    $17,%eax                # 17
  597.         pushl   %eax                    # Push param #1.
  598.         call    proc$test_9            
  599.         addl    $8,%esp                 # Pop params.
  600.         movl    $17,%eax                # 17
  601.         pushl   %eax                    # Push param #2.
  602.         movl    $11,%eax                # 11
  603.         negl    %eax                    # - (prefix)
  604.         pushl   %eax                    # Push param #1.
  605.         call    proc$test_9            
  606.         addl    $8,%esp                 # Pop params.
  607.         movl    $11,%eax                # 11
  608.         negl    %eax                    # - (prefix)
  609.         pushl   %eax                    # Push param #2.
  610.         movl    $11,%eax                # 11
  611.         negl    %eax                    # - (prefix)
  612.         pushl   %eax                    # Push param #1.
  613.         call    proc$test_9            
  614.         addl    $8,%esp                 # Pop params.
  615.         movl    $0,%eax                 # 0
  616.         pushl   %eax                    # Push param #2.
  617.         movl    $17,%eax                # 17
  618.         pushl   %eax                    # Push param #1.
  619.         call    proc$test_9            
  620.         addl    $8,%esp                 # Pop params.
  621.         movl    $17,%eax                # 17
  622.         pushl   %eax                    # Push param #2.
  623.         movl    $0,%eax                 # 0
  624.         pushl   %eax                    # Push param #1.
  625.         call    proc$test_9            
  626.         addl    $8,%esp                 # Pop params.
  627.         movl    $11,%eax                # 11
  628.         negl    %eax                    # - (prefix)
  629.         pushl   %eax                    # Push param #2.
  630.         movl    $0,%eax                 # 0
  631.         pushl   %eax                    # Push param #1.
  632.         call    proc$test_9            
  633.         addl    $8,%esp                 # Pop params.
  634.         movl    $0,%eax                 # 0
  635.         pushl   %eax                    # Push param #2.
  636.         movl    $0,%eax                 # 0
  637.         pushl   %eax                    # Push param #1.
  638.         call    proc$test_9            
  639.         addl    $8,%esp                 # Pop params.
  640.         leave                           # End of testbinarynumeric
  641.         ret                            
  642. prog$operatortest_1:
  643.         enter   $32,$1                  # Start of operatortest
  644.         call    proc$testunaryboolean_2
  645.         call    proc$testunarynumeric_6
  646.         call    proc$testbinaryboolean_4
  647.         call    proc$testbinarynumeric_8
  648.         leave                           # End of operatortest
  649.         ret
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement