Miroirs/planckforth
1
0
Fork 0
mirror of https://github.com/nineties/planckforth synced 2024-12-25 21:58:22 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Add test/export.fs

Browse source
This commit is contained in:
Koichi Nakamura 2021-01-17 12:57:43 +09:00
parent bb4ab5f431
commit c7bcd8282e
2 changed files with 33 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
runtests.fs
View file

@ -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
View 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