Class: Skipjack::FSharpCompiler

Inherits:
Object
  • Object
show all
Defined in:
lib/skipjack/fsharp.rb

Instance Attribute Summary collapse

Instance Method Summary collapse

Constructor Details

#initialize(*args) {|_self| ... } ⇒ FSharpCompiler

Returns a new instance of FSharpCompiler.

Yields:

  • (_self)

Yield Parameters:



7
8
9
10
11
 
# File 'lib/skipjack/fsharp.rb', line 7

def initialize *args
  @args = *args
  self.resident = true #default value
  yield self if block_given?
end

Instance Attribute Details

#local_refs ⇒ Object 



30
31
32
 
# File 'lib/skipjack/fsharp.rb', line 30

def local_refs
  @local_refs ||= []
end

#references ⇒ Object 



26
27
28
 
# File 'lib/skipjack/fsharp.rb', line 26

def references
  @references ||= []
end

#resident ⇒ Object

Returns the value of attribute resident.



5
6
7
 
# File 'lib/skipjack/fsharp.rb', line 5

def resident
  @resident
end

#target ⇒ Object

Returns the value of attribute target.



3
4
5
 
# File 'lib/skipjack/fsharp.rb', line 3

def target
  @target
end

Instance Method Details

#add_argument(arg) ⇒ Object 



39
40
41
42
 
# File 'lib/skipjack/fsharp.rb', line 39

def add_argument arg
  @added_arguments ||= []
  @added_arguments << arg
end

#add_reference(ref, copy_local: false) ⇒ Object 



34
35
36
37
 
# File 'lib/skipjack/fsharp.rb', line 34

def add_reference(ref, copy_local: false)
  references << ref
  local_refs << ref if copy_local
end

#add_reference_dependencies(task) ⇒ Object 



78
79
80
81
82
83
84
85
86
 
# File 'lib/skipjack/fsharp.rb', line 78

def add_reference_dependencies(task)
  local_refs.each do |r|
    dest = File.join(File.dirname(task.name), File.basename(r))
    reference_task = Rake::FileTask::define_task dest => [r] do |t|
      FileUtils.cp(t.prerequisites[0], t.name)
    end
    task.enhance [reference_task] unless dest == r
  end
end

#create_file_task(*args) ⇒ Object 



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
73
74
75
76
 
# File 'lib/skipjack/fsharp.rb', line 44

def create_file_task *args
  dependencies = source_files
  file_task = Rake::FileTask::define_task *args do |t|
    if t.application.windows?
      compiler = "fsc"
    else
      compiler = "fsharpc"
    end

    target = self.target
    case File.extname(t.name) 
    when ".exe"
      target = :exe 
    when ".dll"
      target = :library 
    end unless target
    opts = []
    opts << "--out:#{t.name}"
    opts << "--target:#{target.to_s}"
    @added_arguments.each { |a| opts << a } if @added_arguments
    references.each { |r| opts << "--reference:#{r}" }
    if resident
      opts << "--resident"
    end

    dir = File.dirname(t.name)

    cmd = "#{compiler} #{opts.join(" ")} #{source_files.join(" ")}"
    puts cmd
    raise "Error executing command" unless Kernel.system cmd
  end
  file_task.enhance dependencies
end

#create_task ⇒ Object 



88
89
90
91
92
 
# File 'lib/skipjack/fsharp.rb', line 88

def create_task
  task = create_file_task *@args
  add_reference_dependencies(task)
  task
end

#source_files ⇒ Object 



22
23
24
 
# File 'lib/skipjack/fsharp.rb', line 22

def source_files
  @source_files ||= []
end

#source_files=(val) ⇒ Object 



18
19
20
 
# File 'lib/skipjack/fsharp.rb', line 18

def source_files=(val)
  @source_files = val
end