fork download
copy 
  1. .data
  2. x:
  3. 	.long	0
  4. s:
  5. 	.string "%d\n\0"
  6.  
  7. .text
  8. .global main
  9. main:				# int main()
  10. 				# {
  11. loop:				# 	for (;;) {
  12. 	pushl	$x		# 		scanf("%d", &x);
  13. 	pushl	$s
  14. 	call	scanf
  15. 	addl	$8, %esp
  16.  
  17. 	movl	x, %eax		# 		if (x == 42) break;
  18. 	subl	$42, %eax
  19. 	jz	break
  20.  
  21. 	pushl	x		# 		printf("%d\n", x);
  22. 	pushl	$s
  23. 	call	printf
  24. 	addl	$8, %esp
  25.  
  26. 	jmp	loop		# 	}
  27. break:
  28.  
  29. 	xor	%eax, %eax	# 	return 0;
  30. 	ret
  31. 				# }
  32.  
Compilation error #stdin compilation error #stdout 0s 0KB
comments (?)
stdin
copy 
1
2
10
42
11
compilation info 
prog.cob:5: Warning: Invalid indicator 'l' at column 7
prog.cob:3: Error: syntax error, unexpected '.', expecting PROGRAM_ID
stdout
copy 
Standard output is empty
https://ideone.com/Stk2I
language:
Cobol (gnucobol 2.2.0)
created:
14 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!