You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@jena.apache.org by an...@apache.org on 2012/10/29 12:37:11 UTC
svn commit: r1403253 -
/jena/Experimental/riot-reader/testing/RIOT/Lang/generate
Author: andy
Date: Mon Oct 29 11:37:11 2012
New Revision: 1403253
URL: http://svn.apache.org/viewvc?rev=1403253&view=rev
Log: (empty)
Modified:
jena/Experimental/riot-reader/testing/RIOT/Lang/generate
Modified: jena/Experimental/riot-reader/testing/RIOT/Lang/generate
URL: http://svn.apache.org/viewvc/jena/Experimental/riot-reader/testing/RIOT/Lang/generate?rev=1403253&r1=1403252&r2=1403253&view=diff
==============================================================================
--- jena/Experimental/riot-reader/testing/RIOT/Lang/generate (original)
+++ jena/Experimental/riot-reader/testing/RIOT/Lang/generate Mon Oct 29 11:37:11 2012
@@ -78,7 +78,13 @@ while(<>)
$text = &testtext ;
$array .= " <#$testname>\n" ;
open F,">:utf8", $file ;
+## if ( $text !~ /^\s*$/s )
+## {
+## syswrite F, "# Licensed under the terms of http://www.apache.org/licenses/LICENSE-2.0\n" ;
+## syswrite F, "\n" ;
+## }
syswrite F, $text ;
+
close F ;
$tests .= qq!
<#$testname> rdf:type $testType ;
@@ -89,10 +95,11 @@ while(<>)
}
}
+open MANIFEST, ">:utf8", "manifest.ttl" ;
$LTEXT = read_file( "LICENSE" , binmode => ':utf8' ) ;
-syswrite STDOUT, $LTEXT ;
+syswrite MANIFEST, $LTEXT ;
-print q!
+print MANIFEST q!
@prefix rdf: <http://www.w3.org/1999/02/22-rdf-syntax-ns#> .
@prefix rdfs: <http://www.w3.org/2000/01/rdf-schema#> .
@prefix mf: <http://www.w3.org/2001/sw/DataAccess/tests/test-manifest#> .
@@ -101,16 +108,16 @@ print q!
@prefix rdft: <http://www.w3.org/ns/rdftest#> .
!;
-print qq!
+print MANIFEST qq!
<> rdf:type mf:Manifest ;
rdfs:comment "${lang} tests" ;
mf:entries
(
!;
-print $array ;
-print qq! ) .\n! ;
+print MANIFEST $array ;
+print MANIFEST qq! ) .\n! ;
-print $tests ;
+print MANIFEST $tests ;
sub testtext
{