Конкатенация строк

Форумы Ошибки в компонентахКонкатенация строк ← Ctrl1Ctrl →

Этот топик читают: Гость

Главный модератор

Ответов: 2999

Рейтинг: 396

#1: 2007-06-22 13:24:39 ЛС | профиль | цитата

Схема:


Add(EntryPoint,14077439,21,105)
{
 link(onStart,6519014:doStrCat,[])
}
Add(StrCat,6519014,84,105)
{
 Str1="Text_1"
 Str2="Text_2"
 link(onStrCat,11918962:doStrCat,[(121,111)(121,111)])
}
Add(StrCat,11918962,140,105)
{
 Str1="Text_3"
 Str2="Text_4"
 link(onStrCat,9599829:doEcho,[])
}
Add(Echo,9599829,196,105)
{
}

Результат:

<?php

echo "Text_3Text_4";

?>

карма: 6

Дорогу осилит идущий. Install/Update HiAsm.NET

Ответов: 2125

Рейтинг: 159

#2: 2007-06-22 13:29:06 ЛС | профиль | цитата

А в чём ошибка-то? Всё правильно.

карма: 1

Главный модератор

Ответов: 2999

Рейтинг: 396

#3: 2007-06-22 13:38:32 ЛС | профиль | цитата

Sorry.

Понял свою ошибку.

карма: 6

Дорогу осилит идущий. Install/Update HiAsm.NET

Администрация

Ответов: 15295

Рейтинг: 1519

#4: 2007-06-22 13:39:08 ЛС | профиль | цитата

Nic, тоже самое в пакете Delphi:

Add(StrCat,6519014,140,105)
{
 Str1="Text_1"
 Str2="Text_2"
 link(onStrCat,11918962:doStrCat,[])
}
Add(StrCat,11918962,196,105)
{
 Str1="Text_3"
 Str2="Text_4"
 link(onStrCat,16006348:doMessage,[])
}
Add(Button,7232119,84,105)
{
 Left=80
 Top=105
 link(onClick,6519014:doStrCat,[])
}
Add(Message,16006348,252,105)
{
}

карма: 27

https://hiasm.com

Главный модератор

Ответов: 2999

Рейтинг: 396

#5: 2007-06-22 13:43:51 ЛС | профиль | цитата

Как использовать константы:


 define(UPLOADEDFILES, "C:\Inetpub\wwwroot\");

Как теперь к ней обратиться из HiAsm? Например, чтобы сложить эту строку с относительным путём:
$fullpath = UPLOADEDFILES.$localpath

карма: 6

Дорогу осилит идущий. Install/Update HiAsm.NET

Администрация

Ответов: 15295

Рейтинг: 1519

#6: 2007-06-22 13:52:15 ЛС | профиль | цитата

Nic писал(а):

Как использовать константы

никак. Потому что в терминах HiAsm это будет непонятно что, ибо define в данном случае есть некое средство облегчения жизни программиста php, а не часть языка. У нас это делается так:

Add(EntryPoint,14077439,63,231)
{
 link(onStart,6519014:doStrCat,[])
}
Add(Echo,9599829,196,231)
{
}
Add(StrCat,6519014,126,231)
{
 link(onStrCat,9599829:doEcho,[])
 link(Str1,12157660:Value,[])
 link(Str2,1488157:Var,[(139,214)(181,214)])
}
Add(Memory,12157660,126,168)
{
 Default=String(Это константа)
}
Add(GlobalVar,1488157,175,168)
{
 Name="localpath"
}

что дает результат:

<?php
echo "Это константа".$localpath;
?>

карма: 27

https://hiasm.com

Главный модератор

Ответов: 2999

Рейтинг: 396

#7: 2007-06-22 13:59:00 ЛС | профиль | цитата

Опять сделал upload с SVN CodeGen.dpr, Errors.pas и hiDie.hws. Запустил make.bat из папки web. Получаю ошибку как вчера - не компилируются web-проекты.

карма: 6

Дорогу осилит идущий. Install/Update HiAsm.NET

Администрация

Ответов: 15295

Рейтинг: 1519

#8: 2007-06-22 14:07:51 ЛС | профиль | цитата

не комитил еще ничего. какая ошибка?

карма: 27

https://hiasm.com

Главный модератор

Ответов: 2999

Рейтинг: 396

#9: 2007-06-22 14:21:47 ЛС | профиль | цитата

Отладка писал(а):

Build start...
Generated code

www.dev.hiasm.com/xf/topic.php?p=59173#P59173

[size=-2]------ Добавлено в 14:19
hiDie.hws - это погрячился - он у меня поправлен поэтому черепаха нашла изменения - Sorry, а вот :

revision 354 писал(а):

пофиксены баги с реализацией user функции
CodeGen.dpr, Errors.pas - modified

[size=-2]------ Добавлено в 14:21
Может не правильно отрабатывает make.bat:

dcc32 писал(а):

"make codegen dll for WEB packed"
Borland Delphi Version 12.0 Copyright (c) 1983,98 Inprise Corporation
direct.inc(18)
CodeGen.dpr(912) Hint: Value assigned to 'wop' never used
CodeGen.dpr(1073) Warning: Variable 'cur' might not have been initialized
CodeGen.dpr(2140) Warning: Return value of function 'TCodeBlock.GetLevel' might be undefin
ed
CodeGen.dpr(3293) Warning: Return value of function 'TParser.CountLexem' might be undefine
d
CodeGen.dpr(3397) Hint: Variable 'pe' is declared but never used in 'TParser.LinkedLexem'
CodeGen.dpr(3435) Warning: Comparison always evaluates to True
CodeGen.dpr(3435) Warning: Comparing signed and unsigned types - widened both operands
CodeGen.dpr(3447) Warning: Return value of function 'TParser.IsSetLexem' might be undefine
d
CodeGen.dpr(3464) Warning: Return value of function 'TParser.IsPropLexem' might be undefin
ed
CodeGen.dpr(3477) Warning: Return value of function 'TParser.IsSecLexem' might be undefine
d
CodeGen.dpr(3492) Warning: Return value of function 'TParser.TypeOfLexem' might be undefin
ed
CodeGen.dpr(3503) Warning: Return value of function 'TParser.StrLexem' might be undefined
CodeGen.dpr(3514) Warning: Return value of function 'TParser.CodeLexem' might be undefined

CodeGen.dpr(3535) Warning: Return value of function 'TParser.CallFunc' might be undefined
CodeGen.dpr(3583) Warning: Return value of function 'TParser.CallIntFunc' might be undefin
ed
CodeGen.dpr(3727) Warning: Variable 'args' might not have been initialized
CodeGen.dpr(3648) Warning: Return value of function 'TParser.CallObject' might be undefine
d
CodeGen.dpr(3834) Warning: Variable 'v' might not have been initialized
CodeGen.dpr(3841) Hint: Variable 'r' is declared but never used in 'TParser.Level5'
CodeGen.dpr(3863) Hint: Variable 'r' is declared but never used in 'TParser.Level6'
CodeGen.dpr(3909) Warning: Return value of function 'TParser.Level8' might be undefined
CodeGen.dpr(3977) Warning: Return value of function 'TParser.Level11' might be undefined
CodeGen.dpr(3959) Hint: Variable 'dt' is declared but never used in 'TParser.Level11'
CodeGen.dpr(4349) Hint: Variable 'buf' is declared but never used in 'synReadFuncList'
CodeGen.dpr(4397)
CodeGen.dpr(227) Hint: Private symbol 'isDebug' declared but never used
CodeGen.dpr(239) Hint: Private symbol 'CheckSymbol' declared but never used
4415 lines, 0.19 seconds, 64088 bytes code, 1905 bytes data.
Press any key to continue . . .

карма: 6

Дорогу осилит идущий. Install/Update HiAsm.NET

Администрация

Ответов: 15295

Рейтинг: 1519

#10: 2007-06-22 14:28:10 ЛС | профиль | цитата

без этого перекомпиляция генератора не будет работать с новой средой:
http://dev.hiasm.com/xf/topic.php?p=59288#P59288

карма: 27

https://hiasm.com

Главный модератор

Ответов: 2999

Рейтинг: 396

#11: 2007-06-22 14:34:03 ЛС | профиль | цитата

Да теперь всё OK!

карма: 6

Дорогу осилит идущий. Install/Update HiAsm.NET

Форумы Ошибки в компонентахКонкатенация строк ← Ctrl1Ctrl →


Сообщение ...
Прикрепленные файлы (файлы не залиты)