diff options
| author | jonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2012-04-15 15:54:10 +0000 |
|---|---|---|
| committer | jonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2012-04-15 15:54:10 +0000 |
| commit | fee1bb3ec8fc6e8b528ef2fefb1ebe63758f162b (patch) | |
| tree | 62af4439c8c2569f831cd135a6c5bf397de464d4 /rtl/java/system.pp | |
| parent | 4c6a532db289fbfb49487652fb644b77d0e6977a (diff) | |
| parent | b4e67ab336b17cc2fd10d3121d5af87c5d9b071d (diff) | |
| download | fpc-fee1bb3ec8fc6e8b528ef2fefb1ebe63758f162b.tar.gz | |
* merged trunk up to r20882
o support for the new codepage-aware ansistrings in the jvm branch
o empty ansistrings are now always represented by a nil pointer rather than
by an empty string, because an empty string also has a code page which
can confuse code (although this will make ansistrings harder to use
in Java code)
o more string helpers code shared between the general and jvm rtl
o support for indexbyte/word in the jvm rtl (warning: first parameter
is an open array rather than an untyped parameter there, so
indexchar(pcharvar^,10,0) will be equivalent to
indexchar[pcharvar^],10,0) there, which is different from what is
intended; changing it to an untyped parameter wouldn't help though)
o default() support is not yet complete
o calling fpcres is currently broken due to limitations in
sysutils.executeprocess() regarding handling unix quoting and
the compiler using the same command lines for scripts and directly
calling external programs
o compiling the Java compiler currently requires adding ALLOW_WARNINGS=1
to the make command line
git-svn-id: http://svn.freepascal.org/svn/fpc/branches/jvmbackend@20887 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'rtl/java/system.pp')
| -rw-r--r-- | rtl/java/system.pp | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/rtl/java/system.pp b/rtl/java/system.pp index 3c2afc9708..71e8e15909 100644 --- a/rtl/java/system.pp +++ b/rtl/java/system.pp @@ -32,13 +32,21 @@ Unit system; Type { Java primitive types } jboolean = boolean; + pjboolean = ^boolean; jbyte = shortint; + pjbyte = ^jbyte; jshort = smallint; + pjshort = ^jshort; jint = longint; + pjint = ^jint; jlong = int64; + pjlong = ^jlong; jchar = widechar; + pjchar = ^jchar; jfloat = single; + pjfloat = ^jfloat; jdouble = double; + pjdouble = ^jdouble; Arr1jboolean = array of jboolean; Arr1jbyte = array of jbyte; @@ -135,6 +143,7 @@ function min(a,b : longint) : longint; {$i jdynarr.inc} {$i jsystem.inc} + {***************************************************************************** Misc. System Dependent Functions *****************************************************************************} @@ -168,5 +177,7 @@ procedure fpc_var_copyout_mismatch(line,column: longint); compilerproc; SystemUnit Initialization *****************************************************************************} +begin + initunicodestringmanager end. |