Where communities thrive


  • Join over 1.5M+ people
  • Join over 100K+ communities
  • Free without limits
  • Create your own community
People
Activity
  • 07:34
    ismaelhamed synchronize #4350
  • Apr 08 23:26
    Arkatufus synchronize #4372
  • Apr 08 23:15
    Arkatufus synchronize #4372
  • Apr 08 23:15
    Arkatufus synchronize #4372
  • Apr 08 22:51
    Aaronontheweb synchronize #4373
  • Apr 08 22:51

    Aaronontheweb on 1.4.5-release-notes

    (compare)

  • Apr 08 22:51

    Aaronontheweb on dev

    v1.4.5 release_notes.md placeho… (compare)

  • Apr 08 22:51
    Aaronontheweb closed #4374
  • Apr 08 22:47
    Aaronontheweb opened #4374
  • Apr 08 22:43
    Aaronontheweb synchronize #4373
  • Apr 08 22:41

    Aaronontheweb on 1.4.5-release-notes

    v1.4.5 release_notes.md placeho… (compare)

  • Apr 08 22:40
    Aaronontheweb synchronize #4373
  • Apr 08 22:04
    Aaronontheweb labeled #4373
  • Apr 08 22:04
    Aaronontheweb labeled #4373
  • Apr 08 22:04
    Aaronontheweb opened #4373
  • Apr 08 21:04
    Arkatufus commented #4372
  • Apr 08 21:01
    Arkatufus synchronize #4372
  • Apr 08 20:52
    Arkatufus synchronize #4372
  • Apr 08 20:36
    Arkatufus synchronize #4372
  • Apr 08 20:33
    Arkatufus commented #4372
Aaron Stannard
@Aaronontheweb
it's just publishNuGetPackages
let me double check the build log
yep, that's correct - just publishNuGetPackages
let publishNugetPackages _ = 
    let rec publishPackage url accessKey trialsLeft packageFile =
        let tracing = enableProcessTracing
        enableProcessTracing <- false
        let args p =
            match p with
            | (pack, key, "") -> sprintf "push \"%s\" %s" pack key
            | (pack, key, url) -> sprintf "push \"%s\" %s -source %s" pack key url

        tracefn "Pushing %s Attempts left: %d" (FullName packageFile) trialsLeft
        try 
            let result = ExecProcess (fun info -> 
                    info.FileName <- nugetExe
                    info.WorkingDirectory <- (Path.GetDirectoryName (FullName packageFile))
                    info.Arguments <- args (packageFile, accessKey,url)) (System.TimeSpan.FromMinutes 1.0)
            enableProcessTracing <- tracing
            if result <> 0 then failwithf "Error during NuGet symbol push. %s %s" nugetExe (args (packageFile, "key omitted",url))
        with exn -> 
            if (trialsLeft > 0) then (publishPackage url accessKey (trialsLeft-1) packageFile)
            else raise exn
    let shouldPushNugetPackages = hasBuildParam "nugetkey"
    let shouldPushSymbolsPackages = (hasBuildParam "symbolspublishurl") && (hasBuildParam "symbolskey")

    if (shouldPushNugetPackages || shouldPushSymbolsPackages) then
        printfn "Pushing nuget packages"
        if shouldPushNugetPackages then
            let normalPackages= 
                !! (nugetDir @@ "*.nupkg") 
                -- (nugetDir @@ "*.symbols.nupkg") |> Seq.sortBy(fun x -> x.ToLower())
            for package in normalPackages do
                publishPackage (getBuildParamOrDefault "nugetpublishurl" "") (getBuildParam "nugetkey") 3 package

        if shouldPushSymbolsPackages then
            let symbolPackages= !! (nugetDir @@ "*.symbols.nupkg") |> Seq.sortBy(fun x -> x.ToLower())
            for package in symbolPackages do
                publishPackage (getBuildParam "symbolspublishurl") (getBuildParam "symbolskey") 3 package
just realized that not all of it made it onto the last code snippet
so all this code does is locate all of the *.nupkg and .symbols.nupkg files
and upload them based on the arguments passed into FAKE
i.e. the publishKey and target
which are different for our build server (MyGet) and production (NuGet)
honestly the easiest way to fix this would be to just add back in build.cmd and build.sh the instructions to dynamically download nuget.exe
because the way this code works is by spawning a process and passing in the commandline args directly
relevant batchfile from DotNetty
@echo off

pushd %~dp0

SETLOCAL
SET CACHED_NUGET=%LocalAppData%\NuGet\NuGet.exe

IF EXIST %CACHED_NUGET% goto copynuget
echo Downloading latest version of NuGet.exe...
IF NOT EXIST %LocalAppData%\NuGet md %LocalAppData%\NuGet
@powershell -NoProfile -ExecutionPolicy unrestricted -Command "$ProgressPreference = 'SilentlyContinue'; Invoke-WebRequest 'https://www.nuget.org/nuget.exe' -OutFile '%CACHED_NUGET%'"

:copynuget
IF EXIST .nuget\nuget.exe goto restore
md .nuget
copy %CACHED_NUGET% .nuget\nuget.exe > nul

:restore

.nuget\NuGet.exe update -self

.nuget\NuGet.exe install FAKE -OutputDirectory packages -ExcludeVersion -Version 3.28.8

.nuget\NuGet.exe install xunit.runner.console -ConfigFile .nuget\Nuget.Config -OutputDirectory packages\FAKE -ExcludeVersion -Version 2.0.0

if not exist packages\SourceLink.Fake\tools\SourceLink.fsx ( 
  .nuget\nuget.exe install SourceLink.Fake -OutputDirectory packages -ExcludeVersion
)
rem cls

set encoding=utf-8
packages\FAKE\tools\FAKE.exe build.fsx %*

popd
and BASH equivalent
#!/bin/bash

SCRIPT_PATH="${BASH_SOURCE[0]}";
if ([ -h "${SCRIPT_PATH}" ]) then
  while([ -h "${SCRIPT_PATH}" ]) do SCRIPT_PATH=`readlink "${SCRIPT_PATH}"`; done
fi
pushd . > /dev/null
cd `dirname ${SCRIPT_PATH}` > /dev/null
SCRIPT_PATH=`pwd`;
popd  > /dev/null

if ! [ -f $SCRIPT_PATH/.nuget/nuget.exe ] 
    then
        wget "https://www.nuget.org/nuget.exe" -P $SCRIPT_PATH/.nuget/
fi

mono $SCRIPT_PATH/.nuget/nuget.exe update -self

mono $SCRIPT_PATH/.nuget/nuget.exe install FAKE -OutputDirectory $SCRIPT_PATH/packages -ExcludeVersion -Version 3.28.8

mono $SCRIPT_PATH/.nuget/nuget.exe install xunit.runners -OutputDirectory $SCRIPT_PATH/packages/FAKE -ExcludeVersion -Version 2.0.0

if ! [ -e $SCRIPT_PATH/packages/SourceLink.Fake/tools/SourceLink.fsx ] ; then
    mono $SCRIPT_PATH/.nuget/nuget.exe install SourceLink.Fake -OutputDirectory $SCRIPT_PATH/packages -ExcludeVersion

fi

export encoding=utf-8

mono $SCRIPT_PATH/packages/FAKE/tools/FAKE.exe build.fsx "$@"
Aaron Stannard
@Aaronontheweb
that would need to be merged with whatever Paket code is there
use Paket for restore
NuGet for push
Bartosz Sypytkowski
@Horusiath
I'm not 100% sure, but Paket can publish nuget packages and it's self updating
Aaron Stannard
@Aaronontheweb
yeah, but why do we need that?
this code works fine as long as the binary is there
Paket's primary value is on restore
do whatever you need to, but something needs to be fixed in order to get nightlies back
Aaron Stannard
@Aaronontheweb
@Horusiath any thoughts on that?
btw - going to be upgrading the build server to support C# 6, F# 4, and Code Contracts soon
I just have to install a new version of Visual Studio and do some other song and dance
Bartosz Sypytkowski
@Horusiath
+1000 for code contracts
I'll see what I can do
Aaron Stannard
@Aaronontheweb
yeah, I fell in love with them on DotNetty
started using them in NBench, which I'm hoping to have a demo of in our contributors meeting
Bartosz Sypytkowski
@Horusiath
pretty bad, that they should be basically compiler feature ;)
Aaron Stannard
@Aaronontheweb
yeah, I agree with that haha
NBench is something I came up with while I was on vacation - to build a robust history going forward around performance in key areas of Akka.NET, Helios, DotNetty, and our serializers
combines profiling techniques with unit testing
i.e. write a unit test that guarantees that a benchmark never has more than N GC2 collections during each run
Bartosz Sypytkowski
@Horusiath
@Aaronontheweb I'd also focus on that: http://www.privateeye.io/
it's in beta and it's pretty impressive right now - I've talked with greg young, and he wants to keep it free for OSS projects
Aaron Stannard
@Aaronontheweb
cool - what I want is automated performance testing though
i.e. something that screams and fails loudly when a key metric gets fucked up on a PR
Bartosz Sypytkowski
@Horusiath
yeah I know, this is more for profiling
Aaron Stannard
@Aaronontheweb
.NET needs better profiling tools
PerfView has been what I've been using
and it's a bit of a bear to be honest
if you're a Microsoft engineer and have spent a lot of time working with Event Tracing for Windows, PerfView is probably amazing
PrivateEye looks cool
Bartosz Sypytkowski
@Horusiath
this one has metrics about bytes used, nr of calls, allocations and more - and what's the best it works from F# Repl, can be used on living code and composed via observables with any UI you want
Aaron Stannard
@Aaronontheweb
would love to use that for troubleshooting issues with the performance-critical parts
Ashit Shakrani
@ashshak
Hi Guys,
I am just spiking the FSM and can't get it to transition to the 2nd state, am I missing anything here:
public MyFsm()
        {
            MyStates myStates = new MyStates(); 
            StartWith(myStates.Ready, new MyData());

            When(myStates.Ready, @event =>
            {
                State<MyState, MyData> nextState=null;

                @event.FsmEvent.Match()
                    .With<MyEvents.Calculate>(calculate =>
                    {
                        StateData.Item1 = calculate.Item1;
                        StateData.Item2 = calculate.Item2;
                        nextState = GoTo(myStates.Calculating, StateData);
                    })
                    .Default(o =>
                    {
                        nextState = Stay();
                    });

                return nextState;
            });

            When(myStates.Calculating, @event =>
            {
                StateData.Sum = StateData.Item1 + StateData.Item2;
                return GoTo(myStates.Calculated, StateData);
            });
            Initialize();
        }
Aaron Stannard
@Aaronontheweb
@ashshak can you show the full FSM code along with the messages you're sending it?
Ashit Shakrani
@ashshak
sure, here a gist:
https://gist.github.com/ashshak/211a7323a78065558b43
Thanks for having a look.
Aaron Stannard
@Aaronontheweb
ah, I think I may know why.. can you verify that the GoTo(myStates.Calculating, StateData) is being called?