🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Thread View: pl.comp.lang.pascal
1 messages
1 total messages Started by webmajsterek Thu, 01 Sep 2011 15:32
[ Lazarus ] Błąd kompilatora ??
#93193
Author: webmajsterek
Date: Thu, 01 Sep 2011 15:32
28 lines
1736 bytes
mam taki kod  dla delphi  ( komponent NewAC 2.6 ) --  ale kompiluje go w 
Lazarusie ( FPC 2.5.1 ).

i kompilacja zatrzymuje się na 

const
  JumpFarId = $E9;
  JumpPtrId = $25FF;  


{......}

        PByte(@{^}System.Move)^ := JumpFarId; <<<<<<<<<<<<<<<<< Lina 1000 
        PInteger(Integer(@System.Move)+1)^ :=
          Integer(SrcProc) - Integer(@System.Move)-5; {Change Destination}

FastMove.pas(1000,16) Error: Variable identifier expected
{^} -- miejsce wskazyywane przzz kompilator 

jednak jak zmienie  linie 1000 na 

        PByte(@System.Move+(1-1))^ := JumpFarId;

kompilacja przechodzi dalej .  Jak myślicie to błąd kompilatora  że w orginale 
nie przepuszcza ??

-- 
Wysłano z serwisu OnetNiusy: http://niusy.onet.pl
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads