python: compressed using lines
parent
0af4fee085
commit
6a8fe41b90
|
@ -1,13 +1,5 @@
|
||||||
USING:
|
USING: alien alien.c-types alien.destructors alien.libraries alien.libraries.finder
|
||||||
alien
|
alien.syntax assocs kernel sequences system ;
|
||||||
alien.c-types
|
|
||||||
alien.destructors
|
|
||||||
alien.libraries alien.libraries.finder
|
|
||||||
alien.syntax
|
|
||||||
assocs
|
|
||||||
kernel
|
|
||||||
sequences
|
|
||||||
system ;
|
|
||||||
IN: python.ffi
|
IN: python.ffi
|
||||||
|
|
||||||
<< "python" {
|
<< "python" {
|
||||||
|
|
|
@ -1,14 +1,5 @@
|
||||||
USING:
|
USING: accessors arrays assocs calendar continuations destructors fry kernel
|
||||||
accessors arrays assocs
|
math namespaces python python.ffi sequences strings tools.test ;
|
||||||
calendar
|
|
||||||
continuations
|
|
||||||
destructors
|
|
||||||
fry kernel
|
|
||||||
math
|
|
||||||
namespaces
|
|
||||||
python python.ffi
|
|
||||||
sequences
|
|
||||||
strings tools.test ;
|
|
||||||
IN: python.tests
|
IN: python.tests
|
||||||
|
|
||||||
py-initialize
|
py-initialize
|
||||||
|
|
|
@ -1,17 +1,5 @@
|
||||||
USING:
|
USING: accessors alien alien.c-types alien.data arrays assocs fry grouping
|
||||||
accessors
|
hashtables kernel namespaces python.ffi sequences strings words ;
|
||||||
alien alien.c-types alien.data
|
|
||||||
arrays
|
|
||||||
assocs
|
|
||||||
fry
|
|
||||||
grouping
|
|
||||||
hashtables
|
|
||||||
kernel
|
|
||||||
namespaces
|
|
||||||
python.ffi
|
|
||||||
sequences
|
|
||||||
strings
|
|
||||||
words ;
|
|
||||||
IN: python
|
IN: python
|
||||||
QUALIFIED: math
|
QUALIFIED: math
|
||||||
|
|
||||||
|
|
|
@ -1,13 +1,5 @@
|
||||||
USING:
|
USING: assocs destructors fry kernel math namespaces python python.ffi
|
||||||
assocs
|
python.syntax python.tests sequences tools.test ;
|
||||||
destructors
|
|
||||||
fry
|
|
||||||
kernel
|
|
||||||
math
|
|
||||||
namespaces
|
|
||||||
python python.ffi python.syntax python.tests
|
|
||||||
sequences
|
|
||||||
tools.test ;
|
|
||||||
IN: python.syntax.tests
|
IN: python.syntax.tests
|
||||||
|
|
||||||
! Define your own type conversions.
|
! Define your own type conversions.
|
||||||
|
|
|
@ -1,19 +1,6 @@
|
||||||
USING:
|
USING: accessors arrays effects effects.parser formatting fry generalizations
|
||||||
accessors
|
kernel lexer locals namespaces parser python python.ffi sequences
|
||||||
arrays
|
sequences.generalizations vocabs.parser words ;
|
||||||
effects effects.parser
|
|
||||||
formatting
|
|
||||||
fry
|
|
||||||
generalizations
|
|
||||||
kernel
|
|
||||||
lexer
|
|
||||||
locals
|
|
||||||
namespaces
|
|
||||||
parser
|
|
||||||
python python.ffi
|
|
||||||
sequences sequences.generalizations
|
|
||||||
vocabs.parser
|
|
||||||
words ;
|
|
||||||
IN: python.syntax
|
IN: python.syntax
|
||||||
|
|
||||||
py-initialize
|
py-initialize
|
||||||
|
@ -47,11 +34,11 @@ SYMBOL: current-module
|
||||||
effect quot [ define-inline ] bi ; inline
|
effect quot [ define-inline ] bi ; inline
|
||||||
|
|
||||||
:: add-function ( function effect -- )
|
:: add-function ( function effect -- )
|
||||||
|
effect in>> { "ret" } <effect> :> py-effect
|
||||||
function "%s" effect [ factor>factor-quot ] make-function
|
function "%s" effect [ factor>factor-quot ] make-function
|
||||||
function "|%s" effect [ py>factor-quot ] make-function
|
function "|%s" effect [ py>factor-quot ] make-function
|
||||||
function "|%s|" effect in>> { "ret" } <effect> [ py>py-quot ] make-function
|
function "|%s|" py-effect [ py>py-quot ] make-function
|
||||||
function "%s|" effect in>> { "ret" } <effect> [ factor>py-quot ] make-function
|
function "%s|" py-effect [ factor>py-quot ] make-function ; inline
|
||||||
; inline
|
|
||||||
|
|
||||||
: parse-python-word ( -- )
|
: parse-python-word ( -- )
|
||||||
scan-token dup ";" = [ drop ] [
|
scan-token dup ";" = [ drop ] [
|
||||||
|
|
Loading…
Reference in New Issue