1"======================================================================
2|
3|   Java run-time support.  java.io.ObjectInputStream native methods.
4|
5|
6 ======================================================================"
7
8
9"======================================================================
10|
11| Copyright 2003 Free Software Foundation, Inc.
12| Written by Paolo Bonzini.
13|
14| This file is part of GNU Smalltalk.
15|
16| The GNU Smalltalk class library is free software; you can redistribute it
17| and/or modify it under the terms of the GNU General Public License
18| as published by the Free Software Foundation; either version 2, or (at
19| your option) any later version.
20|
21| The GNU Smalltalk class library is distributed in the hope that it will be
22| useful, but WITHOUT ANY WARRANTY; without even the implied warranty of
23| MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General
24| Public License for more details.
25|
26| You should have received a copy of the GNU Lesser General Public License
27| along with the GNU Smalltalk class library; see the file COPYING.  If not,
28| write to the Free Software Foundation, 51 Franklin Street, Fifth Floor,
29| Boston, MA 02110-1301, USA.
30|
31 ======================================================================"
32
33
34!JavaVM methodsFor: 'java.io.ObjectInputStream'!
35
36java_io_ObjectInputStream_allocateObject_java_lang_Class: arg1
37    <javaNativeMethod: #'allocateObject(Ljava/lang/Class;)Ljava/lang/Object;'
38        for: #{Java.java.io.ObjectInputStream} static: false>
39    ^arg1 new
40!
41
42java_io_ObjectInputStream_callConstructor_java_lang_Class: arg1 java_lang_Object: arg2
43    <javaNativeMethod: #'callConstructor(Ljava/lang/Class;Ljava/lang/Object;)V'
44        for: #{Java.java.io.ObjectInputStream} static: false>
45    ^arg2 perform: (arg1 >> #'<init>()V')
46! !
47
48