Lines Matching refs:context

108 my ($record, $context, $resource_names, $datafile_name);
120     $context = $name;
151     $record->{$context} .= $text;
186                 @ascii = unpack("C*", $record->{$context});
194                 $record->{$context} = "";
198             $record->{$context} =~ s/(["\\])/\\$1/g;
199             $record->{$context} =~ s/[\n]/\\n/g;
200             $record->{$context} =~ s/[\t]/\\t/g;
201             print "    $class_context( \"$record->{$context}\" ),\n";
202             print   FO  "    $class_context( \"$record->{$context}\" ),\n";
204             $record->{$context} = "";
210                     print "    $class_context( $record->{$context} ),\n";
211                     print   FO  "    $class_context( $record->{$context} ),\n";
213                     $record->{$context} = "";
219         $context = "";