diff options
Diffstat (limited to 'projects/mongrel_service/native/mongrel_service.bi')
-rw-r--r-- | projects/mongrel_service/native/mongrel_service.bi | 61 |
1 files changed, 0 insertions, 61 deletions
diff --git a/projects/mongrel_service/native/mongrel_service.bi b/projects/mongrel_service/native/mongrel_service.bi deleted file mode 100644 index d5ea0dc..0000000 --- a/projects/mongrel_service/native/mongrel_service.bi +++ /dev/null @@ -1,61 +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.18.
-'#
-'##################################################################
-
-#define SERVICEFB_INCLUDE_UTILS
-#include once "lib/ServiceFB/ServiceFB.bi"
-#include once "console_process.bi"
-
-'# use for debug versions
-#if not defined(GEM_VERSION)
- #define GEM_VERSION (debug mode)
-#endif
-
-'# preprocessor stringize
-#define PPSTR(x) #x
-
-namespace mongrel_service
- const VERSION as string = PPSTR(GEM_VERSION)
-
- '# namespace include
- using fb.svc
- using fb.svc.utils
-
- declare function single_onInit(byref as ServiceProcess) as integer
- declare sub single_onStart(byref as ServiceProcess)
- declare sub single_onStop(byref as ServiceProcess)
-
- '# SingleMongrel
- type SingleMongrel
- declare constructor()
- declare destructor()
-
- '# TODO: replace for inheritance here
- 'declare function onInit() as integer
- 'declare sub onStart()
- 'declare sub onStop()
-
- __service as ServiceProcess
- __console as ConsoleProcess
- __child_pid as uinteger
- end type
-
- '# TODO: replace with inheritance here
- dim shared single_mongrel_ref as SingleMongrel ptr
-end namespace
|