mirror of
				https://gitlab.com/freepascal.org/fpc/source.git
				synced 2025-11-04 04:39:28 +01:00 
			
		
		
		
	* fixed class conversion and inheritance tree errors
git-svn-id: trunk@6871 -
This commit is contained in:
		
							parent
							
								
									5a6eabcd6c
								
							
						
					
					
						commit
						4e5488529d
					
				@ -308,7 +308,7 @@ type
 | 
			
		||||
    Result := Result + ')';
 | 
			
		||||
  end;
 | 
			
		||||
 | 
			
		||||
  function GetParseValueFnName(PasType: TPasType): String;
 | 
			
		||||
  function GetParseValueFnName(PasType: TPasElement): String;
 | 
			
		||||
  var
 | 
			
		||||
    s: String;
 | 
			
		||||
  begin
 | 
			
		||||
 | 
			
		||||
@ -26,9 +26,9 @@ uses DOM, DOM_HTML;
 | 
			
		||||
 | 
			
		||||
type
 | 
			
		||||
 | 
			
		||||
  TXHTMLTitleElement = class(TDOMElement);
 | 
			
		||||
  TXHTMLTitleElement = class(THTMLTitleElement);
 | 
			
		||||
 | 
			
		||||
  TXHTMLHeadElement = class(TDOMElement)
 | 
			
		||||
  TXHTMLHeadElement = class(THTMLHeadElement)
 | 
			
		||||
  private
 | 
			
		||||
    function GetTitleElement: TXHTMLTitleElement;
 | 
			
		||||
  public
 | 
			
		||||
@ -36,7 +36,7 @@ type
 | 
			
		||||
    property TitleElement: TXHTMLTitleElement read GetTitleElement;
 | 
			
		||||
  end;
 | 
			
		||||
 | 
			
		||||
  TXHTMLBodyElement = class(TDOMElement);
 | 
			
		||||
  TXHTMLBodyElement = class(THTMLBodyElement);
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
  TXHTMLType = (xhtmlStrict, xhtmlTransitional);
 | 
			
		||||
 | 
			
		||||
		Loading…
	
		Reference in New Issue
	
	Block a user