Mercurial > hg > Applications > Lite

annotate demoi @ 10:f2aa38ce0787

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
add state display.
author kono
date Fri, 19 Jan 2001 23:14:00 +0900
parents 1c57a78f1d98
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
2
1c57a78f1d98 Initial revision
kono
parents:
diff changeset
1 :- use_module(library(gmlib)).
1c57a78f1d98 Initial revision
kono
parents:
diff changeset
2
1c57a78f1d98 Initial revision
kono
parents:
diff changeset
3 :-[init],compile(display).
1c57a78f1d98 Initial revision
kono
parents:
diff changeset
4 % :-start.
1c57a78f1d98 Initial revision
kono
parents:
diff changeset
5 % :-display.
1c57a78f1d98 Initial revision
kono
parents:
diff changeset
6
1c57a78f1d98 Initial revision
kono
parents:
diff changeset
7 display(Host) :- start(Host),display.