diff: Sicstus barfs on quotes

[David Glen JEFFERY]

Hi Fergus,

I've just commited a fix to fact_table.m which was making Sicstus barf
because \" and not "" was being used. ok?

cvs diff: Diffing .
Index: fact_table.m
===================================================================
RCS file: /home/staff/zs/imp/mercury/compiler/fact_table.m,v
retrieving revision 1.1
diff -u -r1.1 fact_table.m
--- fact_table.m        1996/12/17 23:40:20     1.1
+++ fact_table.m        1997/02/12 05:17:43
@@ -258,9 +258,9 @@
                        { Types0 = [Type | Types] },
                        { Type = term__functor(term__atom("string"), _, _) }
                ->
-                       io__write_string(OutputStream, "\""),
+                       io__write_string(OutputStream, """"),
                        io__write_string(OutputStream, String),
-                       io__write_string(OutputStream, "\", "),
+                       io__write_string(OutputStream, """, "),
                        check_fact_type_and_mode(Types, Terms, Context0, 
                                OutputStream, Result)
                ;
@@ -719,4 +719,4 @@
 %------------------------------------------------------------------------------%
 
 fact_table_generate_c_code(_PredName, _PragmaVars, C_Code) :-
-       C_Code = "fprintf(stderr, \"Fact Tables not yet working\\n\");".
+       C_Code = "fprintf(stderr, ""Fact Tables not yet working\\n"");".
cvs diff: Diffing notes


love and cuddles,
dgj
-- 



This .sig deliberately left blank