Spexeah/Asuro
3
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

DHCP Works now.

Browse Source 
git-svn-id: https://spexeah.com:8443/svn/Asuro@1034 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c
This commit is contained in:
kieron
2020-07-12 17:02:14 +00:00
parent 46cb414b43
commit fbc59a1617
12 changed files with 389 additions and 166 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/include/rand.pas
View File

@ -20,7 +20,7 @@ end;
function rand32 : uint32;
begin
rand32:= (rand SHL 16) AND rand;
rand32:= (rand SHL 16) OR rand;
end;
function rand16 : uint16;
@ -35,7 +35,7 @@ end;
procedure srand(seed : uint32);
begin
next:= seed;
next:= next + seed;
end;
end.