changeset 2905 | f3c79f7193a9 |
parent 2882 | b9aceb3fe3d6 |
child 2915 | a02f276035e8 |
--- a/hedgewars/uConsole.pas Mon Mar 01 19:20:43 2010 +0000 +++ b/hedgewars/uConsole.pas Mon Mar 01 19:54:33 2010 +0000 @@ -65,7 +65,7 @@ s:= str; end; -function RegisterVariable(Name: string; VType: TVariableType; p: pointer; Trusted: boolean): PVariable; +function RegisterVariable(Name: shortstring; VType: TVariableType; p: pointer; Trusted: boolean): PVariable; var value: PVariable; begin New(value);