[system] / trunk / pg / macros / contextTF.pl Repository:
ViewVC logotype

Annotation of /trunk/pg/macros/contextTF.pl

Parent Directory Parent Directory | Revision Log Revision Log


Revision 5046 - (view) (download) (as text)

1 : dpvc 2855 loadMacros("Parser.pl","contextString.pl");
2 : dpvc 2824
3 :     sub _contextTF_init {}; # don't load it again
4 :    
5 : gage 4997 =head3 Context("TF")
6 :    
7 : dpvc 2824 ##########################################################
8 :     #
9 :     # Implements contexts for string-valued answers especially
10 :     # for matching problems (where you match against T and F).
11 :     #
12 :     # Context("TF");
13 :     #
14 :     # You can add new strings to the context as needed (or remove old ones)
15 :     # via the Context()->strings->add() and Context()-strings->remove()
16 : dpvc 3334 # methods.
17 : dpvc 2824 #
18 : gage 4997 # Use:
19 : dpvc 3334 #
20 : dpvc 2912 # ANS(string_cmp("T","F"));
21 : dpvc 2824 #
22 :     # when there are two answers, the first being "T" and the second being "F".
23 :     #
24 :    
25 : gage 4997 =cut
26 :    
27 : dpvc 5046 $context{TF} = Parser::Context->getCopy(undef,"String");
28 : dpvc 2824 $context{TF}->strings->are(
29 : dpvc 3334 "T" => {value => 1},
30 :     "F" => {value => 0},
31 :     "True" => {alias => "T"},
32 :     "False" => {alias => "F"},
33 : dpvc 2824 );
34 :    
35 :     Context("TF");
36 :    
37 :    

aubreyja at gmail dot com
ViewVC Help
Powered by ViewVC 1.0.9