Data update
This commit is contained in:
parent
5150844a7d
commit
4bb20c9b71
7735 changed files with 38060 additions and 199180 deletions
|
|
@ -1,17 +0,0 @@
|
|||
with Ada.Command_Line;
|
||||
with Ada.Directories;
|
||||
with Ada.Text_IO;
|
||||
|
||||
procedure Make_Directory_Path is
|
||||
begin
|
||||
if Ada.Command_Line.Argument_Count /= 1 then
|
||||
Ada.Text_IO.Put_Line ("Usage: make_directory_path <path/to/dir>");
|
||||
return;
|
||||
end if;
|
||||
|
||||
declare
|
||||
Path : String renames Ada.Command_Line.Argument (1);
|
||||
begin
|
||||
Ada.Directories.Create_Path (Path);
|
||||
end;
|
||||
end Make_Directory_Path;
|
||||
|
|
@ -1 +1 @@
|
|||
write.directory "path/to/some/directory" ø
|
||||
write.directory ø "path/to/some/directory"
|
||||
|
|
|
|||
|
|
@ -1 +0,0 @@
|
|||
New-Item -Path ".\path\to\dir" -ItemType Directory -ErrorAction SilentlyContinue
|
||||
Loading…
Add table
Add a link
Reference in a new issue