X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=as%2Flink%2Fz80%2Flkmain.c;h=efec9babe107c8983701c699ad1ee41009f6672d;hb=31b9b53110921b95ab99a245cd4ab5e12005aa27;hp=cbfa64df8ce7543eda711bd443808c4459371ac7;hpb=7f5f383287d77cad6124233c93cfe3390d725816;p=fw%2Fsdcc

diff --git a/as/link/z80/lkmain.c b/as/link/z80/lkmain.c
index cbfa64df..efec9bab 100644
--- a/as/link/z80/lkmain.c
+++ b/as/link/z80/lkmain.c
@@ -1498,3 +1498,28 @@ usage()
                 fprintf(stderr, "%s\n", *dp);
         lkexit(1);
 }
+
+/*)Function VOID    copyfile()
+ *
+ *      FILE    *dest           destination file
+ *      FILE    *src            source file
+ *
+ *      function will copy source file to destination file
+ *
+ *
+ *  functions called:
+ *      int     fgetc()         c_library
+ *      int     fputc()         c_library
+ *
+ *  side effects:
+ *      none
+ */
+VOID copyfile (dest,src)
+FILE *src,*dest ;
+{
+    int ch;
+
+    while ((ch = fgetc(src)) != EOF) {
+        fputc(ch,dest);
+    }
+}