diff options
author | micha <micha@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2006-10-07 19:34:16 +0000 |
---|---|---|
committer | micha <micha@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2006-10-07 19:34:16 +0000 |
commit | 436fadc08deeca078726aeca92372b42c8389400 (patch) | |
tree | a87b0d8bcd8f5ceefba1c5710314b4212b9cd0a6 /compiler/scanner.pas | |
parent | b716d5c0d90324a4d6c75ceff7d52cf51dda7074 (diff) | |
download | fpc-436fadc08deeca078726aeca92372b42c8389400.tar.gz |
add warning for arithmetic on untyped pointers
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@4823 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'compiler/scanner.pas')
-rw-r--r-- | compiler/scanner.pas | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/compiler/scanner.pas b/compiler/scanner.pas index a977cd8d7b..657b209fee 100644 --- a/compiler/scanner.pas +++ b/compiler/scanner.pas @@ -265,11 +265,13 @@ implementation else if s='FPC' then begin aktmodeswitches:=fpcmodeswitches; - include(aktlocalswitches, cs_typed_addresses); + { TODO: enable this for 2.3/2.9 } + // include(aktlocalswitches, cs_typed_addresses); end else if s='OBJFPC' then begin aktmodeswitches:=objfpcmodeswitches; - include(aktlocalswitches, cs_typed_addresses); + { TODO: enable this for 2.3/2.9 } + // include(aktlocalswitches, cs_typed_addresses); end else if s='GPC' then aktmodeswitches:=gpcmodeswitches |