svnno****@sourc*****
svnno****@sourc*****
2009年 12月 8日 (火) 20:47:09 JST
Revision: 3710 http://sourceforge.jp/projects/ttssh2/svn/view?view=rev&revision=3710 Author: doda Date: 2009-12-08 20:47:09 +0900 (Tue, 08 Dec 2009) Log Message: ----------- æååä¸ã® /* ãã³ã¡ã³ãã®éå§ã¨èª¤èªèãã¦ããã®ãä¿®æ£ã Modified Paths: -------------- trunk/teraterm/ttpmacro/ttmbuff.c -------------- next part -------------- Modified: trunk/teraterm/ttpmacro/ttmbuff.c =================================================================== --- trunk/teraterm/ttpmacro/ttmbuff.c 2009-12-06 15:14:26 UTC (rev 3709) +++ trunk/teraterm/ttpmacro/ttmbuff.c 2009-12-08 11:47:09 UTC (rev 3710) @@ -230,6 +230,7 @@ TName LabName; WORD Err; WORD VarType, VarId; + TStrVal tmp; Buff[IBuff] = GlobalLock(BuffHandle[IBuff]); if (Buff[IBuff]==NULL) { @@ -256,11 +257,17 @@ Err = ErrSyntax; } } + else { + LinePtr--; + } /* ÌsÖÚ·OÉAC¾êRgðT·½ßAsÜÅXL·éB*/ - do { - b = GetFirstChar(); - } while (b != 0); + while ((b=GetFirstChar()) != 0) { + if (b=='"' || b=='\'' || b=='#') { + LinePtr--; + GetString(tmp, &Err); + } + } if (Err>0) { DispErr(Err);