factor/demos/nehe/load.factor

19 lines
387 B
Factor
Raw Permalink Normal View History

2006-11-28 21:57:29 -05:00
PROVIDE: demos/nehe
2006-11-28 17:05:01 -05:00
{
+files+ {
"nehe-utils.factor"
"nehe2.factor"
"nehe3.factor"
2006-11-28 23:05:53 -05:00
"nehe4.factor"
2006-11-28 17:05:01 -05:00
}
} ;
USING: kernel gadgets nehe sequences gadgets-buttons ;
2006-11-28 21:57:29 -05:00
MAIN: demos/nehe
2006-11-28 23:05:53 -05:00
{
{ "Nehe 2" [ drop run2 ] }
{ "Nehe 3" [ drop run3 ] }
{ "Nehe 4" [ drop run4 ] }
} [ first2 <bevel-button> ] map make-pile
"Nehe examples" open-titled-window ;