Added callback to open, fixes #49

This commit is contained in:
Devine Lu Linvega
2019-07-15 14:13:42 +09:00
parent b8d076234d
commit 467834115a
6 changed files with 26 additions and 18 deletions

View File

@@ -1,4 +0,0 @@
(
(def value 12)
(def addOne (lambda (a) (add a 1)))
)

13
examples/open.lisp Normal file
View File

@@ -0,0 +1,13 @@
; scale file
(
; Filter
(def filter-action
(lambda () (pixels
(frame)
saturation
0.5)
))
(open (path "/Users/VillaMoirai/Desktop/clip.jpg") filter-action)
)

View File

@@ -1,7 +1,5 @@
(
(run "./include.lisp")
(run "../examples/recursive.lisp")
(echo value)
(echo (addOne value))
)

View File

@@ -1,3 +0,0 @@
; scale file
(open ($path) 0.25 0.25)