3 lines
78 B
Forth
3 lines
78 B
Forth
enum, bind(c) :: nametype
|
|
enumerator :: one=1, two, three
|
|
end enum nametype
|