1234567891011121314151617181920212223242526272829303132 |
- {
- This file is part of the Free Pascal run time library.
- Copyright (c) 2011 by Jonas Maebe,
- members of the Free Pascal development team.
- This file implements support infrastructure for records under the JVM
- See the file COPYING.FPC, included in this distribution,
- for details about the copyright.
- This program is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
- **********************************************************************}
- constructor FpcBaseRecordType.create;
- begin
- end;
- function FpcBaseRecordType.clone: JLObject;
- begin
- result:=inherited;
- end;
- function FpcBaseRecordType.newEmpty: FpcBaseRecordType;
- begin
- result:=FpcBaseRecordType(inherited clone);
- end;
|