@@ -32,14 +32,8 @@ begin
end;
function shmat (shmid:cint; shmaddr:pointer; shmflg:cint): pointer;
-Var raddr : pointer;
- error : ptrint;
begin
- error:=do_syscall(syscall_nr_SHMAT,TSysParam(shmid),TSysParam(shmflg),TSysParam(@raddr),TSysParam(shmaddr));
- If Error<0 then
- shmat:=pointer(error)
- else
- shmat:=raddr;
+ shmat:=pointer(do_syscall(syscall_nr_SHMAT,TSysParam(shmid),TSysParam(shmaddr),TSysParam(shmflg)));
function shmdt (shmaddr:pointer): cint;
@@ -925,7 +925,7 @@
BDR_RAISEDINNER = 4;
BDR_SUNKENINNER = 8;
BDR_RAISEDOUTER = 1;
- BDR_SUNKENOUTER = 1;
+ BDR_SUNKENOUTER = 2;
EDGE_BUMP = 9;
EDGE_ETCHED = 6;
EDGE_RAISED = 5;