diff options
author | cvs2svn <cvs2svn@FreeBSD.org> | 2000-09-23 01:36:53 +0000 |
---|---|---|
committer | cvs2svn <cvs2svn@FreeBSD.org> | 2000-09-23 01:36:53 +0000 |
commit | 8c7499bdfa85657ea6c2517ada0ef4a4db489beb (patch) | |
tree | 1c37a6088704b234484b1352cd1f882fb2a253ad /devel/asis-gpl/files/patch-ab | |
parent | Catch up with Wnn6-lib update. (diff) |
This commit was manufactured by cvs2svn to create tag 'RELEASE_4_1_1'.release/4.1.1
Diffstat (limited to 'devel/asis-gpl/files/patch-ab')
-rw-r--r-- | devel/asis-gpl/files/patch-ab | 27 |
1 files changed, 0 insertions, 27 deletions
diff --git a/devel/asis-gpl/files/patch-ab b/devel/asis-gpl/files/patch-ab deleted file mode 100644 index 294bc08c8226..000000000000 --- a/devel/asis-gpl/files/patch-ab +++ /dev/null @@ -1,27 +0,0 @@ -#PATCHOPTIONS: -p0 ---- examples/ds/display_source.adb.dist Wed Sep 1 17:16:01 1999 -+++ examples/ds/display_source.adb Fri May 26 19:02:05 2000 -@@ -311,7 +311,7 @@ - Asis.Ada_Environments.Dissociate ( The_DS_Context ); - Asis.Implementation.Finalize (""); - -- -- let's delete the *.at? and *.ali files -+ -- let's delete the *.adt and *.ali files - declare - To_Erase : String := Ada.Command_Line.Argument (Command_File) ; - File : File_Type ; -@@ -320,12 +320,12 @@ - To_Erase (To_Erase'Last - 3 .. To_Erase'Last - 1 ) = ".AD" - then - -- tree file -- To_Erase ( To_Erase'Last - 1 ) := 't' ; -+ To_Erase ( To_Erase'Last ) := 't' ; - Open ( File , Out_File , To_Erase ) ; - Delete ( File ) ; - - -- ali file -- To_Erase (To_Erase'Last -2 .. To_Erase'Last) := "ali"; -+ To_Erase (To_Erase'Last - 2 .. To_Erase'Last) := "ali"; - Open ( File , Out_File , To_Erase ) ; - Delete ( File ) ; - |