summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorErich Eckner <git@eckner.net>2019-01-10 13:34:46 +0100
committerErich Eckner <git@eckner.net>2019-01-10 13:34:46 +0100
commit20a1969b4d2c2162364d9348d158fff004399ea8 (patch)
treeeca8e856365c6a5ce8f4ece74e5292b1d128bb70
parent61c267ac8d0c61f7cf7e9a47cf4bdffbdd0088c2 (diff)
downloadmarkov-20a1969b4d2c2162364d9348d158fff004399ea8.tar.xz
disable logs
-rw-r--r--markov.lpr3
-rw-r--r--markov.lps43
2 files changed, 39 insertions, 7 deletions
diff --git a/markov.lpr b/markov.lpr
index adf09db..c2d27a0 100644
--- a/markov.lpr
+++ b/markov.lpr
@@ -8,7 +8,7 @@ uses
{$ENDIF}{$ENDIF}
Classes
{ you can add units after this },
- sysutils, math, mystringlistunit;
+ sysutils, math, mystringlistunit, lowlevelunit;
var
wordFileName,s: string;
@@ -22,6 +22,7 @@ var
i2c: string;
begin
+ __ausgabenMaske:=3; // no logs
randomize;
if paramCount<>3 then begin
writeln(stderr,'usage: markov word-file chain-depth count');
diff --git a/markov.lps b/markov.lps
index f9a0deb..a3874e6 100644
--- a/markov.lps
+++ b/markov.lps
@@ -3,19 +3,20 @@
<ProjectSession>
<Version Value="10"/>
<BuildModes Active="Default"/>
- <Units Count="4">
+ <Units Count="7">
<Unit0>
<Filename Value="markov.lpr"/>
<IsPartOfProject Value="True"/>
<IsVisibleTab Value="True"/>
- <CursorPos X="21" Y="11"/>
+ <TopLine Value="4"/>
+ <CursorPos X="33" Y="25"/>
<UsageCount Value="23"/>
<Loaded Value="True"/>
</Unit0>
<Unit1>
<Filename Value="remove-tags.sh"/>
<IsPartOfProject Value="True"/>
- <EditorIndex Value="1"/>
+ <EditorIndex Value="3"/>
<CursorPos X="13" Y="9"/>
<UsageCount Value="23"/>
<Loaded Value="True"/>
@@ -24,7 +25,7 @@
<Unit2>
<Filename Value="dive-into-wikipedia.sh"/>
<IsPartOfProject Value="True"/>
- <EditorIndex Value="2"/>
+ <EditorIndex Value="4"/>
<CursorPos X="52" Y="5"/>
<UsageCount Value="23"/>
<Loaded Value="True"/>
@@ -33,14 +34,36 @@
<Unit3>
<Filename Value="generate-random-word-from-wikipedia.sh"/>
<IsPartOfProject Value="True"/>
- <EditorIndex Value="3"/>
+ <EditorIndex Value="5"/>
<CursorPos X="55" Y="30"/>
<UsageCount Value="23"/>
<Loaded Value="True"/>
<DefaultSyntaxHighlighter Value="Bash"/>
</Unit3>
+ <Unit4>
+ <Filename Value="../units/mystringlistunit.pas"/>
+ <EditorIndex Value="1"/>
+ <TopLine Value="22"/>
+ <CursorPos X="15" Y="21"/>
+ <UsageCount Value="10"/>
+ <Loaded Value="True"/>
+ </Unit4>
+ <Unit5>
+ <Filename Value="../units/protokollunit.pas"/>
+ <EditorIndex Value="-1"/>
+ <TopLine Value="7"/>
+ <UsageCount Value="10"/>
+ </Unit5>
+ <Unit6>
+ <Filename Value="../units/lowlevelunit.pas"/>
+ <EditorIndex Value="2"/>
+ <TopLine Value="151"/>
+ <CursorPos X="18" Y="185"/>
+ <UsageCount Value="10"/>
+ <Loaded Value="True"/>
+ </Unit6>
</Units>
- <JumpHistory Count="17" HistoryIndex="16">
+ <JumpHistory Count="19" HistoryIndex="18">
<Position1>
<Filename Value="markov.lpr"/>
<Caret Line="19" Column="12"/>
@@ -109,6 +132,14 @@
<Filename Value="markov.lpr"/>
<Caret Line="11" Column="19"/>
</Position17>
+ <Position18>
+ <Filename Value="markov.lpr"/>
+ <Caret Line="71" Column="23" TopLine="46"/>
+ </Position18>
+ <Position19>
+ <Filename Value="../units/mystringlistunit.pas"/>
+ <Caret Line="21" Column="15" TopLine="22"/>
+ </Position19>
</JumpHistory>
</ProjectSession>
</CONFIG>