steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

cocoa.apple-script: Make APPLESCRIPT: take a string.

modern-harvey2
Doug Coleman 2017-08-05 22:33:47 -05:00
parent 08771e950f
commit 8a6094229d
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
basis/cocoa/apple-script/apple-script-docs.factor
View File

@ -8,6 +8,6 @@ HELP: run-apple-script
{ $notes "Currently, return values are unsupported." } ;
HELP: APPLESCRIPT:
{ $syntax "APPLESCRIPT: word ...applescript... ;APPLESCRIPT" }
{ $values { "word" "a new word to define" } { "...applescript..." "AppleScript source text" } }
{ $syntax "APPLESCRIPT: word [[ ...applescript string... ]] " }
{ $values { "word" "a new word to define" } { "...applescript string..." "AppleScript source text" } }
{ $description "Defines a word that when called will run the provided uncompiled AppleScript. The word has stack effect " { $snippet "( -- )" } " due to return values being currently unsupported." } ;

2
basis/cocoa/apple-script/apple-script.factor
View File

@ -12,5 +12,5 @@ IN: cocoa.apple-script
f -> executeAndReturnError: drop ;
SYNTAX: APPLESCRIPT:
scan-new-word ";APPLESCRIPT" parse-multiline-string
scan-new-word scan-object
[ run-apple-script ] curry ( -- ) define-declared ;