equal
deleted
inserted
replaced
20 |
20 |
21 OperatingSystem comment:' |
21 OperatingSystem comment:' |
22 COPYRIGHT (c) 1988 by Claus Gittinger |
22 COPYRIGHT (c) 1988 by Claus Gittinger |
23 All Rights Reserved |
23 All Rights Reserved |
24 |
24 |
25 $Header: /cvs/stx/stx/libbasic/Attic/Unix.st,v 1.44 1995-08-03 03:26:11 claus Exp $ |
25 $Header: /cvs/stx/stx/libbasic/Attic/Unix.st,v 1.45 1995-08-08 00:49:29 claus Exp $ |
26 '! |
26 '! |
27 |
27 |
28 !OperatingSystem primitiveDefinitions! |
28 !OperatingSystem primitiveDefinitions! |
29 |
29 |
30 %{ |
30 %{ |
158 " |
158 " |
159 ! |
159 ! |
160 |
160 |
161 version |
161 version |
162 " |
162 " |
163 $Header: /cvs/stx/stx/libbasic/Attic/Unix.st,v 1.44 1995-08-03 03:26:11 claus Exp $ |
163 $Header: /cvs/stx/stx/libbasic/Attic/Unix.st,v 1.45 1995-08-08 00:49:29 claus Exp $ |
164 " |
164 " |
165 ! |
165 ! |
166 |
166 |
167 documentation |
167 documentation |
168 " |
168 " |
3046 |id| |
3046 |id| |
3047 |
3047 |
3048 id := OperatingSystem fork. |
3048 id := OperatingSystem fork. |
3049 id == 0 ifTrue:[ |
3049 id == 0 ifTrue:[ |
3050 "I am the child" |
3050 "I am the child" |
3051 OperatingSystem exec:'/bin/sh' withArguments:'sh -c ls -l'. |
3051 OperatingSystem exec:'/bin/ls' withArguments:#('ls' '/tmp'). |
3052 "not reached" |
3052 "not reached" |
3053 ] |
3053 ] |
3054 " |
3054 " |
3055 ! |
3055 ! |
3056 |
3056 |