diff options
Diffstat (limited to 'projects/mongrel_service/native/_debug.bi')
-rw-r--r-- | projects/mongrel_service/native/_debug.bi | 59 |
1 files changed, 0 insertions, 59 deletions
diff --git a/projects/mongrel_service/native/_debug.bi b/projects/mongrel_service/native/_debug.bi deleted file mode 100644 index 277de2e..0000000 --- a/projects/mongrel_service/native/_debug.bi +++ /dev/null @@ -1,59 +0,0 @@ -'##################################################################
-'#
-'# mongrel_service: Win32 native implementation for mongrel
-'# (using ServiceFB and FreeBASIC)
-'#
-'# Copyright (c) 2006 Multimedia systems
-'# (c) and code by Luis Lavena
-'#
-'# mongrel_service (native) and mongrel_service gem_pluing are licensed
-'# in the same terms as mongrel, please review the mongrel license at
-'# http://mongrel.rubyforge.org/license.html
-'#
-'##################################################################
-
-'##################################################################
-'# Requirements:
-'# - FreeBASIC 0.17, Win32 CVS Build (as for November 09, 2006).
-'#
-'##################################################################
-
-#ifndef __Debug_bi__
-#define __Debug_bi__
-
-#ifdef DEBUG_LOG
- #include once "vbcompat.bi"
- #ifndef DEBUG_LOG_FILE
- #define DEBUG_LOG_FILE EXEPATH + "\debug.log"
- #endif
-
- '# this procedure is only used for debugging purposed, will be removed from
- '# final compilation
- private sub debug_to_file(byref message as string, byref file as string, byval linenumber as uinteger, byref func as string)
- dim handle as integer
- static first_time as integer
-
- handle = freefile
- open DEBUG_LOG_FILE for append as #handle
-
- if (first_time = 0) then
- print #handle, "# Logfile created on "; format(now(), "dd/mm/yyyy HH:mm:ss")
- print #handle, ""
- first_time = 1
- end if
-
- '# src/module.bas:123, namespace.function:
- '# message
- '#
- print #handle, file; ":"; str(linenumber); ", "; lcase(func); ":"
- print #handle, space(2); message
- print #handle, ""
-
- close #handle
- end sub
- #define debug(message) debug_to_file(message, __FILE__, __LINE__, __FUNCTION__)
-#else
- #define debug(message)
-#endif '# DEBUG_LOG
-
-#endif '# __Debug_bi__
|