fork download

copy

With Ada.Text_IO; Use Ada.Text_IO;  
With Ada.Integer_Text_IO; Use Ada.Integer_Text_IO;
 
procedure Program is
begin
 push ebp
  mov ebp,esp
  cmp DWORD PTR[ebp + 0x8], 0x767
  jg 0x512
  cmp DWORD PTR[ebp + 0x8], 0x1f3 
  jne 0x50a 
  mov eax, DWORD PTR[ebp + 0x8]
  add eax, 0xb 
  jmp 0x529 
  mov eax, DWORD PTR[ebp + 0x8]
  sub eax, 0xb
  jmp 0x529
  cmp DWORD PTR[ebp + 0x8], 0xcde 
  jne 0x523 
  mov eax, DWORD PTR[ebp + 0x8]
  sub eax, 0xb 
  jmp 0x529 
  mov eax, DWORD PTR[ebp + 0x8]
  add eax, 0xb 
  pop ebp 
ret
 
end Program;

prog.s: Assembler messages:
prog.s:1: Error: no such instruction: `with Ada.Text_IO'
prog.s:1: Error: no such instruction: `use Ada.Text_IO'
prog.s:2: Error: no such instruction: `with Ada.Integer_Text_IO'
prog.s:2: Error: no such instruction: `use Ada.Integer_Text_IO'
prog.s:4: Error: no such instruction: `procedure Program is'
prog.s:5: Error: no such instruction: `begin'
prog.s:7: Error: too many memory references for `mov'
prog.s:8: Error: junk `PTR[ebp+0x8]' after expression
prog.s:8: Error: too many memory references for `cmp'
prog.s:10: Error: junk `PTR[ebp+0x8]' after expression
prog.s:10: Error: too many memory references for `cmp'
prog.s:12: Error: too many memory references for `mov'
prog.s:13: Error: too many memory references for `add'
prog.s:15: Error: too many memory references for `mov'
prog.s:16: Error: too many memory references for `sub'
prog.s:18: Error: junk `PTR[ebp+0x8]' after expression
prog.s:18: Error: too many memory references for `cmp'
prog.s:20: Error: too many memory references for `mov'
prog.s:21: Error: too many memory references for `sub'
prog.s:23: Error: too many memory references for `mov'
prog.s:24: Error: too many memory references for `add'
prog.s:27: Warning: end of file not at end of a line; newline inserted
prog.s:28: Error: no such instruction: `end Program'

Standard output is empty