blob: 9f784f7a6dc9400978f8929fe833239bdbd09058 (
plain)
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
73
74
75
76
77
|
require "formula"
class Newlisp < Formula
homepage "http://www.newlisp.org/"
url "http://www.newlisp.org/downloads/newlisp-10.6.2.tgz"
sha1 "8ea722f2ed415548a0904ef15bafd259d8b07e01"
bottle do
sha1 "3201cfe276549f314eb8bd429d849277fd43293b" => :yosemite
sha1 "6a5503849e0d9ad6a28af27e75396f22fb472ed0" => :mavericks
sha1 "bb63e424cc5b4c2caa0c9f414178705c557c32d7" => :mountain_lion
end
devel do
url "http://www.newlisp.org/downloads/development/inprogress/newlisp-10.6.3.tgz"
sha1 "15fff9bff3eb4bb2118b1941ffd34255b9a9a5b5"
end
depends_on "readline"
patch :DATA
def install
# Required to use our configuration
ENV.append_to_cflags "-DNEWCONFIG -c"
system "./configure-alt", "--prefix=#{prefix}", "--mandir=#{man}"
system "make"
system "make check"
system "make install"
end
def caveats; <<-EOS.undent
If you have brew in a custom prefix, the included examples
will need to be be pointed to your newlisp executable.
EOS
end
test do
path = testpath/"test.lsp"
path.write <<-EOS
(println "hello")
(exit 0)
EOS
assert_equal "hello\n", shell_output("#{bin}/newlisp #{path}")
end
end
__END__
--- a/guiserver/newlisp-edit.lsp
+++ b/Users/gordy/tmp/newlisp-edit
@@ -1,4 +1,4 @@
-#!/usr/bin/newlisp
+#!/usr/bin/env newlisp
; newlisp-edit.lsp - multiple tab LISP editor and support for running code from the editor
; needs 9.9.2 version minimum to run
@@ -157,7 +157,7 @@
(write-file file (base64-dec text)))
(if (= ostype "Win32")
(catch (exec (string {newlisp.exe "} currentScriptFile {" } file " > " (string file "out"))) 'result)
- (catch (exec (string "/usr/bin/newlisp " currentScriptFile " " file)) 'result)
+ (catch (exec (string "/usr/local/bin/newlisp " currentScriptFile " " file)) 'result)
)
(if (list? result)
(begin
@@ -225,7 +225,7 @@
(gs:run-shell 'OutputArea
(string newlispDir "/newlisp.exe") (string currentExtension " -C -w \"" $HOME "\""))
(gs:run-shell 'OutputArea
- (string "/usr/bin/newlisp") (string currentExtension " -C -w " $HOME))
+ (string "/usr/local/bin/newlisp") (string currentExtension " -C -w " $HOME))
)
)
|
