blob: 1129a9d4792317582beed86318e67480e385b727 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
|
#!/usr/bin/ruby -Ku
# Log details
# 0 = do not log
# 1 = log fatalities
# 2 = log errors
# 3 = log everything
LOG_LEVEL = 3
#LOG_LEVEL = 0
def File::resolve_symlink( path = __FILE__ )
path = readlink(path) while symlink?(path)
expand_path(path)
end
def require_from_here ( *list )
require File.join( FM_DIR, *list )
end
$: << FM_DIR = File::dirname(File::resolve_symlink)
PID = Process.pid
if ARGV.size > 0
pwd = ARGV.first
if pwd =~ /^file:\/\//
pwd = $'
end
else
pwd = nil
end
#require 'ftools'
require 'pp'
require 'thread'
require_from_here 'interface/ncurses.rb'
require_from_here 'code/fm.rb'
require_from_here 'code/keys.rb'
require_from_here 'code/types.rb'
require_from_here 'code/draw.rb'
require_from_here 'code/extensions.rb'
require_from_here 'code/debug.rb'
include Interface
include Debug
ERROR_STREAM = File.open('/tmp/errorlog', 'a')
#def log(obj)
# $stdout = ERROR_STREAM
# pp caller
# pp obj
# $stdout.flush
# $stdout = STDOUT
# obj
#end
begin
Fm.initialize( pwd )
Fm.main_loop
ensure
closei
Fm.dump
ERROR_STREAM.close
for thr in Thread.list
unless thr == Thread.current
thr.kill
end
end
end
|