changeset 378 | 85ff48546a05 |
parent 220 | e50ea2471e06 |
child 396 | 18c9c28d0f7e |
377:ab8917806779 | 378:85ff48546a05 |
---|---|
92 val delete_file = unlink; |
92 val delete_file = unlink; |
93 end; |
93 end; |
94 |
94 |
95 (*Get pathname of current working directory *) |
95 (*Get pathname of current working directory *) |
96 fun pwd () = System.Directory.getWD (); |
96 fun pwd () = System.Directory.getWD (); |
97 |
|
98 |
|
99 (*** ML command execution ***) |
|
100 |
|
101 fun use_string commands = System.Compile.use_stream (open_string commands); |
|
102 |