- removed po_java procoption, since it wasn't really used for anything

git-svn-id: branches/jvmbackend@18694 -

compiler/pdecobj.pas

@@ -782,7 +782,6 @@ implementation
         begin
           if is_java_class_or_interface(pd.struct) then
             begin
-              include(pd.procoptions,po_java);
             end;
         end;
 

compiler/pjvm.pas

@@ -608,7 +608,7 @@ implementation
         { in case the referred method is from an external class }
         exclude(result.procoptions,po_external);
         { not virtual/override/abstract/... }
-        result.procoptions:=result.procoptions*[po_classmethod,po_staticmethod,po_java,po_varargs,po_public];
+        result.procoptions:=result.procoptions*[po_classmethod,po_staticmethod,po_varargs,po_public];
         result.synthetickind:=tsk_callthrough;
         { so we know the name of the routine to call through to }
         result.skpara:=pd;

compiler/symconst.pas

@@ -315,9 +315,7 @@ type
       (when calling a regular procedure using the above convention, it will
        simply not see the frame pointer parameter, and since the caller cleans
        up the stack will also remain balanced) }
-    po_delphi_nested_cc,
+    po_delphi_nested_cc
-    { Java method }
-    po_java
   );
   tprocoptions=set of tprocoption;
 

compiler/utils/ppudump.pp

@@ -1148,8 +1148,7 @@ const
      (mask:po_objc;            str:'ObjC'),
      (mask:po_enumerator_movenext; str:'EnumeratorMoveNext'),
      (mask:po_optional;        str: 'Optional'),
-     (mask:po_delphi_nested_cc;str: 'Delphi-style nested frameptr'),
+     (mask:po_delphi_nested_cc;str: 'Delphi-style nested frameptr')
-     (mask:po_java            ;str: 'Java method')
   );
 var
   proctypeoption  : tproctypeoption;