$ cat system.pas | |
unit system; | |
interface | |
procedure test; | |
implementation | |
procedure test; | |
var t: longint; | |
begin | |
begin t:=1; end; | |
t:=t+2; | |
end; | |
begin | |
end. | |
$ ./pp -Ooconstprop -Oodeadstore -al -Si -O3 system | |
Free Pascal Compiler version 2.7.1 [2012/12/06] for i386 | |
Copyright (c) 1993-2012 by Florian Klaempfl and others | |
Note: Switching assembler to default source writing assembler | |
Target OS: Linux for i386 | |
Compiling system.pas | |
Unreferenced assignment: 9 | |
Assembling system | |
14 lines compiled, 0.0 sec | |
1 note(s) issued | |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment