Difference between revisions of "Pascal for Java users"
From Lazarus wiki
Jump to navigationJump to search(10 intermediate revisions by 6 users not shown) | |||
Line 1: | Line 1: | ||
− | { | + | {{Pascal for Java users}} |
− | ! | + | |
− | ! | + | == Translating common program snippets == |
− | ! | + | The following site shows how common problems are solved in various programming languages, including Javan and FreePascal/Object Pascal: [http://rosettacode.org/wiki/Category:Pascal Rosetta Code] |
+ | |||
+ | == Translating Java keywords/concepts == | ||
+ | {| class="wikitable" | ||
+ | ! Java !! [[Pascal]] !! Additional comments | ||
|- | |- | ||
| { | | { | ||
Line 227: | Line 231: | ||
| [[Result]] := | | [[Result]] := | ||
| ObjFPC or Delphi modes | | ObjFPC or Delphi modes | ||
+ | |- | ||
+ | | return | ||
+ | | [[Function#return value|Exit()]] | ||
+ | | ObjFPC modes | ||
|- | |- | ||
| static | | static | ||
Line 253: | Line 261: | ||
|- | |- | ||
| synchronized | | synchronized | ||
− | | | + | | [[TCriticalSection]] |
| | | | ||
|- | |- | ||
Line 273: | Line 281: | ||
|- | |- | ||
| try { } catch | | try { } catch | ||
− | | [[Try]] [[ | + | | [[Try]] [[Except]] |
| | | | ||
|- | |- | ||
Line 293: | Line 301: | ||
|} | |} | ||
− | + | == Translating Java data types == | |
− | {| | + | {| class="wikitable" |
− | ! | + | ! Java type !! [[Pascal]] [[Data_type|type]] !! Size (bits) !! Range !! |
− | ! | ||
− | ! | ||
− | ! | ||
− | ! | ||
|- | |- | ||
| byte | | byte | ||
Line 308: | Line 312: | ||
|- | |- | ||
| short | | short | ||
− | | [[ | + | | [[Smallint]] |
| 16-bit | | 16-bit | ||
| -32768 .. 32767 | | -32768 .. 32767 | ||
|- | |- | ||
| int | | int | ||
− | | [[ | + | | [[Longint]] |
| 32-bit | | 32-bit | ||
| -2147483648..2147483647 | | -2147483648..2147483647 | ||
Line 361: | Line 365: | ||
|- | |- | ||
|} | |} | ||
+ | |||
+ | == See also == | ||
+ | * [[Using Pascal Libraries with Java]] |
Latest revision as of 21:00, 4 March 2019
│
Deutsch (de) │
English (en) │
Translating common program snippets
The following site shows how common problems are solved in various programming languages, including Javan and FreePascal/Object Pascal: Rosetta Code
Translating Java keywords/concepts
Java | Pascal | Additional comments |
---|---|---|
{ | Begin | |
} | End | |
= | := | Becomes |
== | = | Equal |
/ | / | Division (or sometimes div) |
% | Mod | Modulo operation |
! | Not | |
!= | <> | Not equal |
&& | And | |
|| | Or | |
^ | Xor | |
>> | Shr | bit shift right |
<< | Shl | bit shift left |
++ | Inc | |
-- | Dec | |
/* | { | Comment start |
/* | (* | Comment start |
*/ | } | Comment end |
*/ | *) | Comment end |
// | // | End of line comment (only one line comment) |
public static void main(String[] args) { } | Program ProgramName; Begin End. | Note the period after End |
someType arrayVar[]; | arrayVar: Array Of someType; | |
someType arrayVar[#]; | arrayVar: Array[MINRANGE..MAXRANGE] Of someType; | |
null | Nil | |
abstract | Abstract | |
break | Break | |
class TheClass { } | TheClass = Class End; | Delphi OOP |
class TheClass { } | TheClass = Object End; | Turbo Pascal OOP |
class TheClass<T> { } | Generic TheClass = Class<T> End; | Generics are classes only as of 2.2.2, likely to support more in the future |
TheClass() | Constructor CtorName | Constructor name is by convention either Init or Create |
continue | Continue | |
do while | Repeat Until Not | |
do while ! | Repeat Until | |
enum TheEnum | TheEnum = ( MINVALUE .. MAXVALUE ); | |
enum TheEnum = {MINVALUE, MAXVALUE} | TheEnum = ( MINVALUE, MAXVALUE ); | |
TheEnum enumVar; | enumVar := Set Of TheEnum; | |
extends | SubClass = Class(BaseClass) | class SubClass extends BaseClass --> SubClass(BaseClass) |
final | Const | for constants, not uninheritables |
for ++ | For To Do | |
for -- | For Downto Do | |
if() | If Then | |
if() else | If Then Else | |
implements | SomeClass = Class(SomeInterface) | |
import | Uses | |
instanceof | Is | |
interface | TheInterface = Interface | |
native | StdCall | For Windows |
native | CDecl | For Unix |
new primitive_type[#]; | SetLength(ArrayVar, #); | |
new Class(); | InstanceVar := TheClass.Create; | |
package pkgName; | Unit unitName; Interface Implementation End. | Note the period after End |
private | Private | |
protected | Protected | |
public | Public | |
return | FunctionName := | |
return | Result := | ObjFPC or Delphi modes |
return | Exit() | ObjFPC modes |
static | Static | |
static | Class Function | |
static | Class Procedure | |
super | Inherited | Parent constructor call |
switch case break | Case Of End | |
switch case break default | Case Of Else End | |
synchronized | TCriticalSection | |
this | Self | |
throw | Raise | |
throws | ||
transient | ||
try { } catch | Try Except | |
try { } catch finally | Try Finally | |
void | Procedure | |
volatile | ||
while | While Do |
Translating Java data types
Java type | Pascal type | Size (bits) | Range | |
---|---|---|---|---|
byte | Shortint | 8-bit | -128 .. 127 | |
short | Smallint | 16-bit | -32768 .. 32767 | |
int | Longint | 32-bit | -2147483648..2147483647 | |
int | Integer | 32-bit | -2147483648..2147483647 | |
long | Int64 | 64-bit | -9 223 372 036 854 775 808 .. 9 223 372 036 854 775 807 | |
float | Single | 32-bit | 1.5E-45 .. 3.4E+38 | |
double | Double | 64-bit | 5.0E-324 .. 1.7E+308 | |
boolean | Boolean | False True | ||
char | WideChar | 16-bit | ||
String | String |