1 files changed, 0 insertions, 44 deletions
diff --git a/delphi/Awkward/utils/utils.pas b/delphi/Awkward/utils/utils.pas
deleted file mode 100644
index 8c16e03..0000000
--- a/delphi/Awkward/utils/utils.pas
+++ /dev/null
@@ -1,44 +0,0 @@
-unit Utils;
-
-interface
-
-uses windows;
-
-function SaveTemporaryW(ptr:pointer;size:dword;ext:PWideChar=nil):pWideChar;
-function SaveTemporary (ptr:pointer;size:dword;ext:PAnsiChar=nil):PAnsiChar;
-
-implementation
-
-uses common,io;
-
-function SaveTemporaryW(ptr:pointer;size:dword;ext:PWideChar=nil):pWideChar;
-var
-  buf,buf1:array [0..MAX_PATH-1] of WideChar;
-  f:THANDLE;
-begin
-  GetTempPathW(MAX_PATH,buf);
-  GetTempFileNameW(buf,'wat',GetCurrentTime,buf1);
-  ChangeExtW(buf1,ext);
-
-  f:=ReWrite(buf1);
-  BlockWrite(f,pByte(ptr)^,size);
-  CloseHandle(f);
-  StrDupW(result,buf1);
-end;
-
-function SaveTemporary(ptr:pointer;size:dword;ext:PAnsiChar=nil):PAnsiChar;
-var
-  buf,buf1:array [0..MAX_PATH-1] of AnsiChar;
-  f:THANDLE;
-begin
-  GetTempPathA(SizeOf(buf),buf);
-  GetTempFileNameA(buf,'wat',GetCurrentTime,buf1);
-  ChangeExt(buf1,ext);
-
-  f:=ReWrite(buf1);
-  BlockWrite(f,pByte(ptr)^,size);
-  CloseHandle(f);
-  StrDup(result,buf1);
-end;
-
-end.
-\ No newline at end of file