7542e5c15d
programming language SML. fxp can validate both XML 1.0 and XML 1.1 documents. It has a programming interface allowing for production of XML applications based on fxp. It is installed with four example applications. WWW: http://www2.informatik.tu-muenchen.de/~berlea/Fxp PR: ports/116572 Submitted by: Timothy Bourke <timbob at bigpond.com>
14 lines
701 B
Standard ML
14 lines
701 B
Standard ML
diff -Naur src/Parser/Parse/parseContent.sml.orig src/Parser/Parse/parseContent.sml
|
|
--- src/Parser/Parse/parseContent.sml.orig 2003-10-09 09:47:56.000000000 -0500
|
|
+++ src/Parser/Parse/parseContent.sml 2003-10-17 14:26:30.000000000 -0500
|
|
@@ -587,7 +587,9 @@
|
|
val _ = Array.update(dataBuffer,0,c0)
|
|
|
|
fun data_hook (i,(a,q)) =
|
|
- hookData(a,((!pos0,getPos q),Array.extract(dataBuffer,0,SOME i),false))
|
|
+ hookData(a,((!pos0,getPos q),
|
|
+ ArraySlice.vector(ArraySlice.slice(dataBuffer,0,SOME i)),
|
|
+ false))
|
|
fun takeOne (c,qE,i,aq as (a,q)) =
|
|
if i<DATA_BUFSIZE then (i+1,aq) before Array.update(dataBuffer,i,c)
|
|
else let val a1 = data_hook(i,(a,qE))
|