* removed all remaining nounsupported ifdefs (except for the one about

    variants)

git-svn-id: http://svn.freepascal.org/svn/fpc/branches/jvmbackend@18770 3ad0048d-3df7-0310-abae-a5850022a9f2

1 files changed, 0 insertions, 4 deletions

diff --git a/compiler/ncgcal.pas b/compiler/ncgcal.pas
index f9d6d9e907..1a207fd499 100644
--- a/compiler/ncgcal.pas
+++ b/compiler/ncgcal.pas
@@ -870,7 +870,6 @@ implementation
          else
            { now procedure variable case }
            begin
-{$if defined(nounsupported) or not defined(jvm)}
               secondpass(right);
 
               pvreg:=cg.getintregister(current_asmdata.CurrAsmList,OS_ADDR);
@@ -880,7 +879,6 @@ implementation
               else
                 cg.a_load_loc_reg(current_asmdata.CurrAsmList,OS_ADDR,right.location,pvreg);
               location_freetemp(current_asmdata.CurrAsmList,right.location);
-{$endif defined(nounsupported) or not defined(jvm)}
 
               { Load parameters that are in temporary registers in the
                 correct parameter register }
@@ -891,7 +889,6 @@ implementation
                   freeparas;
                 end;
 
-{$if defined(nounsupported) or not defined(jvm)}
               cg.alloccpuregisters(current_asmdata.CurrAsmList,R_INTREGISTER,regs_to_save_int);
               if cg.uses_registers(R_FPUREGISTER) then
                 cg.alloccpuregisters(current_asmdata.CurrAsmList,R_FPUREGISTER,regs_to_save_fpu);
@@ -904,7 +901,6 @@ implementation
                 extra_interrupt_code;
               extra_call_code;
               cg.a_call_reg(current_asmdata.CurrAsmList,pvreg);
-{$endif defined(nounsupported) or not defined(jvm)}
               extra_post_call_code;
            end;