mirror of
https://github.com/nineties/planckforth
synced 2024-12-26 21:58:42 +01:00
Add test/export.fs
This commit is contained in:
parent
bb4ab5f431
commit
c7bcd8282e
2 changed files with 33 additions and 0 deletions
|
@ -13,5 +13,7 @@ include test/utilities.fs
|
||||||
include test/errorreport.fs
|
include test/errorreport.fs
|
||||||
include test/coreexttest.fs
|
include test/coreexttest.fs
|
||||||
|
|
||||||
|
include test/export.fs
|
||||||
|
|
||||||
report-errors
|
report-errors
|
||||||
report-and-exit
|
report-and-exit
|
||||||
|
|
31
test/export.fs
Normal file
31
test/export.fs
Normal file
|
@ -0,0 +1,31 @@
|
||||||
|
\ planckforth -
|
||||||
|
\ Copyright (C) 2021 nineties
|
||||||
|
|
||||||
|
testing private and export
|
||||||
|
|
||||||
|
: f1 ;
|
||||||
|
private{
|
||||||
|
|
||||||
|
: f2 ;
|
||||||
|
|
||||||
|
T{ defined? f1 -> true }T
|
||||||
|
T{ defined? f2 -> true }T
|
||||||
|
|
||||||
|
private{
|
||||||
|
|
||||||
|
: f3 ;
|
||||||
|
|
||||||
|
T{ defined? f2 -> true }T
|
||||||
|
T{ defined? f3 -> true }T
|
||||||
|
|
||||||
|
}private
|
||||||
|
|
||||||
|
T{ defined? f1 -> true }T
|
||||||
|
T{ defined? f2 -> true }T
|
||||||
|
T{ defined? f3 -> false }T
|
||||||
|
|
||||||
|
}private
|
||||||
|
|
||||||
|
T{ defined? f1 -> true }T
|
||||||
|
T{ defined? f2 -> false }T
|
||||||
|
T{ defined? f3 -> false }T
|
Loading…
Reference in a new issue