clisp-cvs Digest, Vol 20, Issue 26

[<cli...@li...>]

Send clisp-cvs mailing list submissions to
	cli...@li...

To subscribe or unsubscribe via the World Wide Web, visit
	https://lists.sourceforge.net/lists/listinfo/clisp-cvs
or, via email, send a message with subject or body 'help' to
	cli...@li...

You can reach the person managing the list at
	cli...@li...

When replying, please edit your Subject line so it is more specific
than "Re: Contents of clisp-cvs digest..."


CLISP CVS commits for today

Today's Topics:

   1. clisp/src spvw_debug.d,1.73,1.74 (Sam Steingold)


----------------------------------------------------------------------

Message: 1
Date: Thu, 13 Dec 2007 20:03:03 +0000
From: Sam Steingold <sd...@us...>
Subject: clisp/src spvw_debug.d,1.73,1.74
To: cli...@li...
Message-ID: <E1J...@ma...>

Update of /cvsroot/clisp/clisp/src
In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv6090/src

Modified Files:
	spvw_debug.d 
Log Message:
convert comments "# " --> "/**/"


Index: spvw_debug.d
===================================================================
RCS file: /cvsroot/clisp/clisp/src/spvw_debug.d,v
retrieving revision 1.73
retrieving revision 1.74
diff -u -d -r1.73 -r1.74
--- spvw_debug.d	14 Jan 2007 15:41:33 -0000	1.73
+++ spvw_debug.d	13 Dec 2007 20:03:01 -0000	1.74
@@ -29,11 +29,11 @@
  can trigger GC */
 global maygc object object_out (object obj) {
   pushSTACK(obj);
-  pushSTACK(var_stream(S(terminal_io),strmflags_wr_ch_B)); # *TERMINAL-IO*
-  prin1(&STACK_0,STACK_1); # output the object
-  terpri(&STACK_0); # output a newline
+  pushSTACK(var_stream(S(terminal_io),strmflags_wr_ch_B)); /* *TERMINAL-IO* */
+  prin1(&STACK_0,STACK_1);      /* output the object */
+  terpri(&STACK_0);             /* output a newline */
   skipSTACK(1);
-  return popSTACK(); # return the same object
+  return popSTACK();            /* return the same object */
 }
 
 #ifdef UNICODE




------------------------------

-------------------------------------------------------------------------
SF.Net email is sponsored by:
Check out the new SourceForge.net Marketplace.
It's the best place to buy or sell services
for just about anything Open Source.
http://ad.doubleclick.net/clk;164216239;13503038;w?http://sf.net/marketplace

------------------------------

_______________________________________________
clisp-cvs mailing list
cli...@li...
https://lists.sourceforge.net/lists/listinfo/clisp-cvs


End of clisp-cvs Digest, Vol 20, Issue 26
*****************************************