From 44dd58419067db10c042c3d68ab128ec2e974a87 Mon Sep 17 00:00:00 2001 From: Norayr Chilingarian Date: Thu, 10 Apr 2014 17:02:55 +0400 Subject: [PATCH] added includes to not use internal write, read in Console and Unix Former-commit-id: b25a810007dbc05b67c45ffd9c9584451c7040e4 --- ocat | Bin 203966 -> 203966 bytes showdef.REMOVED.git-id | 2 +- src/lib/system/linux/clang/Console.Mod | 4 ++++ src/lib/system/linux/clang/x86_64/Unix.Mod | 8 ++++++++ voc.REMOVED.git-id | 2 +- vocstatic.linux.clang.x86_64.REMOVED.git-id | 2 +- 6 files changed, 15 insertions(+), 3 deletions(-) diff --git a/ocat b/ocat index 11a4c91ff40af25a2d12da67aad7d8bf58132ace..6cbe071ccbc99eeb71b1e6067eb1602160b6ed4c 100755 GIT binary patch delta 1615 zcmZ9MZA@EL7{||Zj=(*)mlj4xyBCzjmw-zcWSJu|U78G%nthPWKnTl_jdgSh2{_9j zkyw+NECsTGGaf%|?gNRNLq{VYuH7ahY83pkIo~F`%`|>N)2K1N5MQXzx#zSi_RHyW ze*fqH{LksVoljfyX)D#zy*bjmaVWZttWz zhgMhm-p}O_&P_y*c|9wyUCHH=t=UL2d$z4Ecs3Xhc~+iKd*iLyR~7>&hvW8e9HIv7 z7nval8k~^epKG~x``=M0dl@D~3D8KgIfb!DSWVyGUt9Wr#P8Y zoXjas<`gG$ijz6T$(-V3j!M>`k~zi6oLfMcjae8T1MYJ6-W46t7O#6~GQgG)PD{AV z*|+a#xFiNFI##`mZ0`fezTwQsvt{8cN0vqQy<~SdYkXVxWyP#yYsgOG<-pgRb2N=^ S+f#qhGo`TK-UjUamj3|9^i5&_ delta 1619 zcmZ9Me@I(b6vywmx9YnuFNvC%q^)C-{Xjd|l*(EdmW)@|y zGU%YhbW>^J{?o312y5-u81Rob2TKbbuKxA1?w7NZ4#r>`VI5;X%GQ~k``%3&=RcQo zKHqcB_nmu9cFD*t8JT^(+fsGogAF7@e)N7)D12Hmh=Ke|wm(?x?G050J_3xQsj>Sg zdFA6mA$siBXmV`v?BEHHhN<)ELLqtX+L6$?x_HEgiB_3t&!^h+(PX~o=JC_9xEYH> zT!T)rJ_aF;6B7Dsqj1Rl_cf?`3sRy2Xc*oWPXg`P7HIB`$nj)AozSIU)d+!laS>=J zQ9p@{&L)U%%4}o!<%m?1?S0M(U9P9MN+77zO}JjPWf$yd#Q38U*^YOyfX)sReObcR zu&QkyDD|*)txna1>y9mxQG(8n81{f?=j@gpMyLvV>~f@0BlzgUC_?ycS=m`^94QUZ z*CjYyOiY)6>o@7}@PgeOzw&3P>z`5l$a906E%qym&fEbf8Zm6cDvA;PPuXNt{6cBy z=%`wZqdBE2h|cg@U^1in-#cEKlaj@g#dZ2^S#gfNrq`V)X8hzqs_;3r#r!YhqGAbDDIsQZAN(AG$|Sk`n-FMvzY~zpA!piIu$TogfND!zTxb{v|^?> z=s~uEY)-OO&c3^**owF(*&4FFTabOtnO04-n^=yU!1JLiA~6EO7=NtSLPLK65d*5ZOD$v zr*WIJ+!e*z#DZiU$e3K~XPn)?tXPLQ=%dL5>qj^zVUDwK5z6E$W@_-;gZMTeM}R+t zqvNz=J4rf)MaWN%uy-coRrex46H)xd`w8{-yhbg)B9`|^Bi!?=%mg1 zynEy)W*lWVp%;5gi~)i^&?Kb>D0%Z`Xxu%N2)K&`fTP@1ltp`CGMQi z7QTAAFk=kn2VCa91mNzw8-qh%pxwDR5ALjwk zwYHT@+6&^J6g|Oy&>GC4vvdj?=K=HsSzQ~ayM0>hysquhE@=V%ciQ4x)#{v+)oQio Y)_3Tu!*Ix){hLl#LZ{gP?Be$S05^D02mk;8 diff --git a/showdef.REMOVED.git-id b/showdef.REMOVED.git-id index 81f7e60d..9c3d430f 100644 --- a/showdef.REMOVED.git-id +++ b/showdef.REMOVED.git-id @@ -1 +1 @@ -f5fd9a8471482e945d275319e4740da9a07a053f \ No newline at end of file +b8912125a0cc6b1d7322b4e8f0651f41ece55412 \ No newline at end of file diff --git a/src/lib/system/linux/clang/Console.Mod b/src/lib/system/linux/clang/Console.Mod index e523ef7b..9b6b6611 100644 --- a/src/lib/system/linux/clang/Console.Mod +++ b/src/lib/system/linux/clang/Console.Mod @@ -7,6 +7,10 @@ MODULE Console; (* J. Templ, 29-June-96 *) VAR line: ARRAY 128 OF CHAR; pos: INTEGER; + (* for read(), write() *) + PROCEDURE -includeUnistd() + "#include "; + PROCEDURE -Write(adr, n: LONGINT) "write(1/*stdout*/, adr, n)"; diff --git a/src/lib/system/linux/clang/x86_64/Unix.Mod b/src/lib/system/linux/clang/x86_64/Unix.Mod index 7dfde70d..2e3099ce 100644 --- a/src/lib/system/linux/clang/x86_64/Unix.Mod +++ b/src/lib/system/linux/clang/x86_64/Unix.Mod @@ -313,6 +313,14 @@ from man gettimeofday PROCEDURE -includeErrno() "#include "; + (* for read(), write() *) + PROCEDURE -includeUnistd() + "#include "; + + (* for system() *) + PROCEDURE -includeStdlib() + "#include "; + PROCEDURE -err(): LONGINT "errno"; diff --git a/voc.REMOVED.git-id b/voc.REMOVED.git-id index 4358417c..09127b81 100644 --- a/voc.REMOVED.git-id +++ b/voc.REMOVED.git-id @@ -1 +1 @@ -9986ddb20ed214b5db77e1a3ff72ac05bb12f8af \ No newline at end of file +675d9ee513e6424d707a4e82ff97bddacb103fcc \ No newline at end of file diff --git a/vocstatic.linux.clang.x86_64.REMOVED.git-id b/vocstatic.linux.clang.x86_64.REMOVED.git-id index 4358417c..09127b81 100644 --- a/vocstatic.linux.clang.x86_64.REMOVED.git-id +++ b/vocstatic.linux.clang.x86_64.REMOVED.git-id @@ -1 +1 @@ -9986ddb20ed214b5db77e1a3ff72ac05bb12f8af \ No newline at end of file +675d9ee513e6424d707a4e82ff97bddacb103fcc \ No newline at end of file