! Pretty sure the # of None references should stay constant.
: count-none-refs ( -- n )
- [
- "sys" "getrefcount" py-import-from
- <none> <1py-tuple> call-object py>
- ] with-destructors ;
+ "sys" "getrefcount" py-import-from
+ <none> <1py-tuple> call-object py> ;
-{ t } [
- ! For some reason, the count increased by one the first time.
- count-none-refs drop
- count-none-refs count-none-refs =
-] py-test
+{ t } [ count-none-refs count-none-refs = ] py-test
{ } [ { f f f } >py drop ] py-test
! Module variables are bound as zero-arg functions
{ t } [ $path py> s:sequence? ] py-test
-{ t } [ $path py> empty? not ] py-test
+{ t } [ $path py> s:empty? not ] py-test
[ 10 ] [ 10 >py range len py> ] py-test