Commit 3400443f authored by Andres Toom's avatar Andres Toom Committed by Daniel Tuulik
Browse files

Commit initial parse.out files and test status summary

The out files were generated using a command like:

  find -name "*.pr" -print -exec sh -c "qgen-sdl-parse {} > {}-parse.out" \;

Where qgen-sdl-parse is a helper script that calls the
AntLR 4/Java parser with a command like:

  JAR_DIR=<some dir>
  java -jar ${JAR_DIR}ee.ibk.sdl.parser.jar $@

and also logs status
parent 1300298d
[INFO] Starting to parse model: test-equal/system_structure.pr
[INFO] Parsing completed
[INFO] Parse result: 102
[INFO] Starting to parse model: test-exitnested/system_structure.pr
[ERROR] Failed to parse model.
line 5:34 mismatched input ';' expecting '*/'
[INFO] Starting to parse model: test-expressions/system_structure.pr
[INFO] Parsing completed
[INFO] Parse result: 102
[INFO] Starting to parse model: test-forloop/og.pr
[ERROR] Failed to parse model.
line 3:4 no viable alternative at input '/* CIF TEXT (159, 221), (287, 188) */\n -- Text area for declarations and comments\n\nuse dv comment 'dataview-uniq.asn';\n\n--use dv2 comment 'dataview2.asn';\n\nsignal dd(myinteger);\nsignal we(myinteger);\n\nprocedure anExternalProc;\nfpar in/out a_param MyInteger;\nexternal;\n /* CIF ENDTEXT */\n CHANNEL c\n FROM ENV TO og WITH dd;\n FROM og TO ENV WITH we;\n ENDCHANNEL;\n BLOCK og;\n SIGNALROUTE r\n FROM ENV TO og WITH dd;\n FROM og TO ENV WITH we;\n CONNECT c AND r;\n /* CIF PROCESS (225, 49), (150, 75) */\n PROCESS og;\n /* CIF TEXT (57, 58), (303, 140) */\n -- Test the proper check of RANGE parameters\n\ndcl foo SeqOf;\n\ndcl a, b MyInteger;\n\ndcl c,d MyREAL;\n /* CIF ENDTEXT */\n /* CIF START (184, 217), (70, 35) */\n START;\n /* CIF TASK (86, 267), (266, 53) */\n TASK for each in range (fix(1),fix(20.0) , 2):\n call writeln(each);\nendfor;\n /* CIF NEXTSTATE (184, 350), (70, 35) */\n NEXTSTATE wait;\n /* CIF STATE (419, 218), (70, 35) */\n STATE wait;\n ENDSTATE;\n ENDPROCESS og;\n ENDBLOCK;\n'
[INFO] Starting to parse model: test-ibk/packetmanager.pr
[ERROR] Failed to parse model.
line 8:20 no viable alternative at input '/* CIF TEXT (673, 16), (357, 140) */\n -- Text area for declarations and comments\n \n DCL noOfSentPackets My8BitArrayValueInteger := 1;\n /* CIF ENDTEXT */\n /* CIF START (28, 0), (70, 35) */\n START;\n /* CIF NEXTSTATE (0, 58), (127, 35) */\n NEXTSTATE frameReceival;\n /* CIF STATE (345, 0), (127, 35) */\n STATE frameReceival;\n /* CIF INPUT (318, 55), (181, 35) */\n INPUT ReceivePacket(packet);\n /* CIF OUTPUT (287, 105), (244, 35) */\n OUTPUT SendFrameCount(length(packet));\n /* CIF LABEL (348, 155), (122, 54) */\n frameSending:\n /* CIF OUTPUT (264, 224), (290, 35) */\n OUTPUT SendFrame(packet(noOfSentPackets - 1));\n /* CIF DECISION (258, 274), (301, 50) */\n DECISION length(packet) = noOfSentPackets;\n /* CIF ANSWER (137, 344), (70, 23) */\n (true):\n /* CIF RETURN (155, 382), (35, 35) */\n RETURN ;\n /* CIF ANSWER (618, 344), (70, 23) */\n (false):\n /* CIF TASK (339, 382), (628, 35) */\n TASK noOfSentPackets := if noOfsentPackets = 255 then noOfSentPackets else noOfSentPackets + 1 fi;\n /* CIF JOIN (636, 432), (35, 35) */\n JOIN frameSending;\n ENDDECISION;\n ENDSTATE;\n ENDSUBSTRUCTURE;\n STATE frameReceival;\n SUBSTRUCTURE\n /* CIF TEXT (1100, 14), (336, 140) */\n -- Text area for declarations and comments\n \n DCL frameCounter My8BitArrayValueInteger := 0;\n /* CIF ENDTEXT */\n /* CIF START (69, 0), (70, 35) */\n START;\n /* CIF NEXTSTATE (22, 50), (164, 35) */\n NEXTSTATE frameCountReceival;\n /* CIF STATE (270, 0), (164, 35) */\n STATE frameCountReceival;\n /* CIF INPUT (231, 55), (243, 35) */\n INPUT ReceiveFrameCount(frameCount);\n /* CIF NEXTSTATE (289, 105), (127, 35) */\n NEXTSTATE frameReceival;\n ENDSTATE;\n /* CIF STATE (726, 0), (127, 35) */\n STATE frameReceival;\n /* CIF INPUT (695, 55), (189, 35) */\n INPUT ReceiveFrame(frame);\n /* CIF TASK (515, 105), (548, 38) */\n TASK frameCounter := if frameCounter = 255 then frameCounter else frameCounter + 1 fi,\npacket(frameCounter - 1) := frame;\n /* CIF DECISION (675, 161), (229, 41) */\n DECISION frameCounter = frameCount;\n /* CIF ANSWER (631, 222), (70, 23) */\n (true):\n /* CIF OUTPUT (585, 260), (162, 35) */\n OUTPUT SendPacket(packet);\n /* CIF RETURN (648, 310), (35, 35) */\n RETURN ;\n /* CIF ANSWER (873, 222), (70, 23) */\n (false):\n /* CIF NEXTSTATE (844, 260), (127, 35) */\n NEXTSTATE frameReceival;\n ENDDECISION;\n ENDSTATE;\n ENDSUBSTRUCTURE;\n /* CIF STATE (11, 0), (134, 35) */\n STATE frameReceival;\n ENDSTATE;\n /* CIF STATE (0, 49), (159, 35) */\n STATE packetReceival;\n ENDSTATE;\n ENDSUBSTRUCTURE;\n /* CIF TEXT (328, 13), (300, 140) */\n -- Text area for declarations and comments\n \n DCL frameCount My8BitArrayValueInteger;\n \n DCL frame MyFrame;\n \n DCL packet MyPacket;\n /* CIF ENDTEXT */\n /* CIF START (49, 1), (70, 35) */\n START;\n /* CIF LABEL (49, 56), (70, 35) */\n waiting:\n /* CIF NEXTSTATE (49, 111), (70, 35) */\n NEXTSTATE wait;\n /* CIF STATE (175, 1), (70, 35) */\n STATE wait;\n ENDSTATE;\n'
[INFO] Starting to parse model: test-ibk/system_structure.pr
[INFO] Parsing completed
[INFO] Parse result: 102
This diff is collapsed.
[INFO] Starting to parse model: test-ibk2/system_structure.pr
[INFO] Parsing completed
[INFO] Parse result: 102
This diff is collapsed.
[INFO] Starting to parse model: test-ibk3/system_structure.pr
[INFO] Parsing completed
[INFO] Parse result: 102
[INFO] Starting to parse model: test-instance/og.pr
[ERROR] Failed to parse model.
line 4:4 mismatched input '-- A Demo to test octet strings\n -- using various symbols.\n \n -- check that types are case insensitive\n DCL first_msg, msg my_octStr;\n \n DCL seq SeqOf;\n \n DCL test Some_Thing;\n dcl foo MyInteger := 3;\n \n -- Unicode comments: héhé hôhÖ\n \n dcl alwaysTrue Type2 := 3 in {1,2,3};\n dcl alwaysFalse Type2 := 0 in {1,2,3};\n \n dcl seqofbool seqBool := { true, true};\n /* CIF ENDTEXT */\n /* CIF START (1427, 35), (100, 50) */\n START;\n /* CIF task (1370, 100), (214, 83) */\n task test := 5,\ntest := power(test, 1),\ntest := abs(-4+1),\ntest := abs(test)\n /* CIF comment (1603, 123), (183, 35) */\n comment 'Task with unicode: voilà!';\n /* CIF task (1375, 198), (204, 50) */\n task first_msg := 'Say hello first!'\n /* CIF comment (1599, 198), (148, 50) */\n comment 'String assignment';\n /* CIF PROCEDURECALL (1388, 263), (177, 35) */\n call writeln( first_msg(1,2));\n /* CIF PROCEDURECALL (1373, 313), (207, 35) */\n call writeln( not (not not true));\n /* CIF task (1394, 363), (165, 50) */\n task seq := default_seqof,\nseq := {1,2,3}\n /* CIF comment (1579, 363), (204, 50) */\n comment 'default_seqof is a constant\ndefined in the ASN.1 model';\n /* CIF task (1345, 428), (263, 50) */\n task seq := seq // {4, test} // default_seqof\n /* CIF comment (1629, 428), (156, 50) */\n comment 'Concatenate\ntwo SEQUENCE OF';\n /* CIF task (1408, 493), (137, 50) */\n task 'seq(1) := seq(2)';\n /* CIF task (1382, 558), (189, 50) */\n task seq := seq(0,1) // seq(3, 4)\n /* CIF comment (1590, 558), (166, 50) */\n comment 'Remove 3rd element';\n /* CIF task (1407, 623), (140, 53) */\n task for x in seq:\n call writeln(x);\nendfor;\n /* CIF PROCEDURECALL (1395, 691), (164, 35) */\n call writeln('test=', test);\n /* CIF decision (1425, 741), (104, 70) */\n decision test in seq\n /* CIF comment (1549, 756), (170, 39) */\n comment 'Test the "in" operator\nUnicode test: Ï';\n /* CIF ANSWER (1335, 831), (100, 35) */\n (TRUE):\n /* CIF PROCEDURECALL (1308, 881), (154, 50) */\n call writeln('All OK (1)');\n /* CIF ANSWER (1498, 831), (100, 35) */\n (FALSE):\n /* CIF PROCEDURECALL (1466, 881), (164, 50) */\n call writeln('NOT OK (1)')\n /* CIF comment (1650, 888), (117, 35) */\n comment 'Call UnicÔDË';\n enddecision;\n /* CIF decision (1427, 946), (100, 70) */\n decision 3 in seq\n /* CIF comment (1547, 963), (256, 35) */\n comment 'test==3 so it should also return true';\n /* CIF ANSWER (1341, 1036), (100, 35) */\n (TRUE):\n /* CIF PROCEDURECALL (1309, 1086), (164, 50) */\n call writeln('ALL OK (2)');\n /* CIF ANSWER (1513, 1036), (100, 35) */\n (FALSE):\n /* CIF PROCEDURECALL (1481, 1086), (164, 50) */\n call writeln('NOT OK (2)');\n enddecision;\n /* CIF NEXTSTATE (1427, 1151), (100, 50) */\n NEXTSTATE Wait;\n /* CIF state (2204, 160), (100, 50) */\n state Running;\n /* CIF input (2204, 230), (100, 50) */\n input go(msg)\n /* CIF comment (2324, 237), (184, 35) */\n comment 'Comment on process type';\n /* CIF PROCEDURECALL (2202, 300), (103, 35) */\n call writeln(msg);\n /* CIF decision (2202, 350), (103, 70) */\n decision msg\n /* CIF comment (2326, 360), (111, 50) */\n comment 'Switch-case\non strings';\n /* CIF ANSWER (2454, 440), (100, 35) */\n ('egg'):\n /* CIF task (2433, 490), (141, 50) */\n task msg := msg // '!!'\n /* CIF comment (2595, 490), (118, 50) */\n comment 'Concatenate\nstrings';\n /* CIF output (2429, 555), (150, 50) */\n output rezult(default_str)\n /* CIF comment (2594, 553), (161, 53) */\n comment 'Send a constant\ndefined in the ASN.1\nmodel';\n /* CIF NEXTSTATE (2454, 620), (100, 50) */\n NEXTSTATE Running\n /* CIF comment (2574, 627), (96, 35) */\n comment 'Néxtaytè';\n /* CIF ANSWER (1864, 440), (100, 35) */\n ('end'):\n /* CIF output (1858, 490), (112, 50) */\n output rezult\n('Goodbye!');\n /* CIF NEXTSTATE (1864, 557), (100, 50) */\n NEXTSTATE Wait;\n /* CIF ANSWER (2042, 440), (100, 35) */\n ELSE:\n /* CIF task (2021, 490), (141, 50) */\n task msg := msg // '!'\n /* CIF comment (2183, 490), (118, 50) */\n comment 'Concatenate\nstrings';\n /* CIF PROCEDURECALL (2008, 560), (167, 35) */\n call writeln('msg//! = ', msg);\n /* CIF task (1994, 610), (195, 50) */\n task msg := msg(3,4) // msg(1,2)\n /* CIF comment (2210, 610), (209, 53) */\n comment 'Concatenate two substrings\n(can be used to remove an\nelement from a list)';\n /* CIF PROCEDURECALL (1980, 680), (224, 35) */\n call writeln('msg(3,4)//(1,2) = ',msg);\n /* CIF task (2010, 730), (163, 50) */\n task msg := first_msg(1, 2)\n /* CIF comment (2186, 727), (177, 53) */\n comment 'Substring\nTODO check range\nagainst current Length';\n /* CIF PROCEDURECALL (1992, 800), (200, 35) */\n call writeln('first_msg(1,2)=',msg)\n /* CIF comment (2212, 800), (100, 35) */\n comment 'should be ay';\n /* CIF output (2038, 850), (108, 50) */\n output rezult(msg);\n /* CIF NEXTSTATE (2042, 915), (100, 50) */\n NEXTSTATE Running;\n enddecision;\n endstate;\n /* CIF state (1427, 1151), (100, 50) */\n state Wait;\n /* CIF input (1427, 1221), (100, 50) */\n input go(msg)\n /* CIF comment (1547, 1228), (120, 35) */\n comment 'Ïñpût unicode';\n /* CIF decision (1420, 1286), (114, 70) */\n decision msg = 'hello'\n /* CIF comment (1554, 1296), (128, 50) */\n comment 'Boolean test\non string value';\n /* CIF ANSWER (1638, 1376), (100, 35) */\n (FALSE):\n /* CIF output (1618, 1426), (139, 50) */\n output rezult(first_msg)\n /* CIF comment (1777, 1433), (85, 35) */\n comment 'OûtpUT';\n /* CIF NEXTSTATE (1638, 1491), (100, 50) */\n NEXTSTATE Wait;\n /* CIF ANSWER (1367, 1376), (100, 35) */\n (TRUE):\n /* CIF output (1344, 1426), (145, 50) */\n output rezult('Welcome')\n /* CIF comment (1509, 1426), (95, 50) */\n comment 'Send raw\nstring';\n /* CIF decision (1368, 1491), (98, 50) */\n decision 3 in {1,2,3};\n /* CIF ANSWER (1328, 1561), (88, 33) */\n (1 in {1,2}):\n /* CIF ANSWER (1418, 1561), (88, 33) */\n (0 in {1,2}):\n enddecision;\n /* CIF decision (1368, 1609), (98, 50) */\n decision 4 in {1,2,3};\n /* CIF ANSWER (1339, 1679), (66, 33) */\n (true):\n /* CIF ANSWER (1422, 1679), (70, 33) */\n (false):\n enddecision;\n /* CIF NEXTSTATE (1367, 1727), (100, 50) */\n NEXTSTATE Running;\n enddecision;\n endstate;\n' expecting PROCESS
[INFO] Starting to parse model: test-instance/system_structure.pr
[INFO] Parsing completed
[INFO] Parse result: 102
[INFO] Starting to parse model: test-iterators/orchestrator.pr
[ERROR] Failed to parse model.
line 79:70 extraneous input ')' expecting ';'
[INFO] Starting to parse model: test-llvm/system_structure.pr
[INFO] Parsing completed
[INFO] Parse result: 102
[INFO] Starting to parse model: test-math/expressions.pr
[ERROR] Failed to parse model.
line 7:4 mismatched input '-- Declare an external procedure that has a return type\n-- Use this to get access to C libraries (eg. math lib)\n-- without having to write manually external code\n-- Just link your code with the SDL object.\nprocedure log;\nfpar in par real;\nreturns real\nexternal;\n /* CIF ENDTEXT */\n /* CIF START (625, 146), (70, 34) */\n START;\n /* CIF NEXTSTATE (625, 199), (70, 35) */\n NEXTSTATE wait;\n /* CIF STATE (625, 199), (70, 35) */\n STATE wait;\n /* CIF INPUT (620, 255), (81, 38) */\n INPUT run;\n /* CIF TASK (588, 308), (144, 35) */\n TASK f := log(f);\n /* CIF NEXTSTATE (624, 358), (72, 38) */\n NEXTSTATE Wait;\n ENDSTATE;\n' expecting PROCESS
[INFO] Starting to parse model: test-math/system_structure.pr
[INFO] Parsing completed
[INFO] Parse result: 102
[INFO] Starting to parse model: test-nestedpriority/challenge.pr
[ERROR] Failed to parse model.
line 85:8 no viable alternative at input '/* CIF PROCEDURE (104, 101), (70, 35) */\n PROCEDURE exit;\n /* CIF START (198, 116), (70, 35) */\n START;\n /* CIF PROCEDURECALL (142, 166), (181, 35) */\n CALL writeln('exit nested_1');\n /* CIF RETURN (215, 216), (35, 35) */\n RETURN ;\n ENDPROCEDURE;\n /* CIF PROCEDURE (110, 183), (74, 35) */\n PROCEDURE entry;\n /* CIF START (105, 54), (70, 35) */\n START;\n /* CIF PROCEDURECALL (34, 104), (210, 35) */\n CALL writeln('entering nested_1');\n /* CIF RETURN (122, 154), (35, 35) */\n RETURN ;\n ENDPROCEDURE;\n /* CIF START (245, 55), (70, 35) */\n START;\n /* CIF NEXTSTATE (233, 105), (93, 35) */\n NEXTSTATE nested_2;\n /* CIF STATE (276, 165), (93, 35) */\n STATE nested_2;\n /* CIF INPUT (287, 220), (70, 35) */\n INPUT run;\n /* CIF PROCEDURECALL (263, 270), (118, 35) */\n CALL writeln('OK');\n /* CIF NEXTSTATE (287, 320), (70, 35) */\n NEXTSTATE -;\n ENDSTATE;\n ENDSUBSTRUCTURE;\n /* CIF PROCEDURE (334, 58), (70, 35) */\n PROCEDURE exit;\n /* CIF START (76, 53), (70, 35) */\n START;\n /* CIF PROCEDURECALL (27, 103), (167, 35) */\n CALL writeln('exit nested');\n /* CIF RETURN (93, 153), (35, 35) */\n RETURN ;\n ENDPROCEDURE;\n /* CIF PROCEDURE (340, 134), (74, 35) */\n PROCEDURE entry;\n /* CIF START (121, 85), (70, 35) */\n START;\n /* CIF PROCEDURECALL (57, 135), (196, 35) */\n CALL writeln('entering nested');\n /* CIF RETURN (138, 185), (35, 35) */\n RETURN ;\n ENDPROCEDURE;\n /* CIF START (136, 68), (70, 35) */\n START;\n /* CIF NEXTSTATE (124, 118), (93, 35) */\n NEXTSTATE nested_1;\n /* CIF STATE (124, 118), (93, 35) */\n STATE nested_1;\n /* CIF INPUT (130, 173), (80, 35) */\n INPUT go_off;\n /* CIF RETURN (152, 223), (35, 35) */\n RETURN ;\n ENDSTATE;\n ENDSUBSTRUCTURE;\n /* CIF START (92, 76), (68, 37) */\n START;\n /* CIF NEXTSTATE (86, 128), (79, 35) */\n NEXTSTATE nested;\n /* CIF STATE (389, 131), (70, 35) */\n STATE well;\n ENDSTATE;\n /* CIF STATE (86, 128), (79, 35) */\n STATE nested;\n /* CIF INPUT (145, 183), (70, 35) */\n INPUT run;\n /* CIF PROCEDURECALL (105, 233), (149, 35) */\n CALL writeln('FAIL');\n /* CIF NEXTSTATE (145, 283), (70, 35) */\n NEXTSTATE -;\n /* CIF CONNECT (51, 183), (0, 35) */\n CONNECT'
[INFO] Starting to parse model: test-nestedpriority/system_structure.pr
[ERROR] Failed to parse model.
line 5:34 mismatched input ';' expecting '*/'
[INFO] Starting to parse model: test-nocif/system_structure.pr
[INFO] Parsing completed
[INFO] Parse result: 102
[INFO] Starting to parse model: test-nocif2/DemoDeviceDSAP_fixed.pr
[ERROR] Failed to parse model.
line 3:4 no viable alternative at input '/* CIF TEXT (178, 209), (356, 140) */\r\n -- Text area for declarations and comments\r\n\r\nsignal a;\r\nsignal b;\r\n\r\nuse datamodel comment 'dv.asn';\r\n /* CIF ENDTEXT */\r\n CHANNEL c\r\n FROM ENV TO DemoDemoDeviceDSAP WITH a;\r\n FROM DemoDemoDeviceDSAP TO ENV WITH b;\r\n ENDCHANNEL;\r\n BLOCK DemoDemoDeviceDSAP;\r\n SIGNALROUTE r\r\n FROM ENV TO DemoDemoDeviceDSAP WITH a;\r\n FROM DemoDemoDeviceDSAP TO ENV WITH b;\r\n CONNECT c AND r;\r\n\r\nPROCESS DemoDemoDeviceDSAP;\r\n\r\n /* CIF TEXT (55, 105), (356, 140) */\r\n DCL CommandAddress CcsdsSoisSubnetworkMemoryAddressType := 100;\r\n DCL ExtendedStatusModeAddress CcsdsSoisSubnetworkMemoryAddressType := 102;\r\n DCL MemoryID CcsdsSoisSubnetworkMemoryIDType := 0;\r\n DCL StatusAddress CcsdsSoisSubnetworkMemoryAddressType := 101;\r\n DCL ack DemoTelemetryAckType;\r\n DCL event DemoEventType;\r\n DCL eventTM DemoTelemetryEventType;\r\n DCL extendedMode DemoExtendedModeUnionType;\r\n DCL extendedStatus DemoExtendedStatusUnionType;\r\n DCL status DemoStatusType;\r\n DCL telecommandMode DemoTelecommandModeType;\r\n DCL telecommandType DemoTelecommandTypeEnumType;\r\n DCL telecommandUserData DemoTelecommandUserDataType;\r\n DCL telemetry1 DemoTelemetry1Type;\r\n DCL telemetry2 DemoTelemetry2Type;\r\n /* CIF ENDTEXT */\r\n\r\n PROCEDURE EventParam;\r\n START;\r\n TASK event!fldType := eventTM!fldEventType;\r\n TASK event!fldData := eventTM!fldEventData;\r\n -- todo - read deviceEvent from DeviceInterface\r\n\r\n RETURN;\r\n ENDPROCEDURE;\r\n PROCEDURE GetExtendedMode;\r\n START;\r\n -- todo - call interface write\r\n RETURN;\r\n ENDPROCEDURE;\r\n PROCEDURE GetExtendedStatus;\r\n START;\r\n -- todo - call interface write\r\n RETURN;\r\n ENDPROCEDURE;\r\n PROCEDURE GetExtendedStatusMode;\r\n START;\r\n -- todo - call interface read\r\n RETURN;\r\n ENDPROCEDURE;\r\n PROCEDURE ReadStatus;\r\n START;\r\n -- todo - call interface read\r\n RETURN;\r\n ENDPROCEDURE;\r\n PROCEDURE ReturnExtendedMode;\r\n START;\r\n -- todo - read extendedMode from DeviceInterface\r\n\r\n RETURN;\r\n ENDPROCEDURE;\r\n PROCEDURE ReturnExtendedStatus;\r\n START;\r\n -- todo - read extendedStatus from DeviceInterface\r\n\r\n RETURN;\r\n ENDPROCEDURE;\r\n PROCEDURE ReturnStatus;\r\n START;\r\n -- todo - read status from DeviceInterface\r\n\r\n RETURN;\r\n ENDPROCEDURE;\r\n PROCEDURE TCReceive;\r\n START;\r\n DECISION (telecommandType=mode);\r\n (true):\r\n -- todo - call interface setMode\r\n (false):\r\n -- todo - call interface setUserData\r\n ENDDECISION;\r\n RETURN;\r\n ENDPROCEDURE;\r\n PROCEDURE TCSendMode;\r\n START;\r\n TASK telecommandType := mode;\r\n -- todo - call interface send\r\n RETURN;\r\n ENDPROCEDURE;\r\n PROCEDURE TCSendUserData;\r\n START;\r\n TASK telecommandType := USER_DATA;\r\n -- todo - call interface send\r\n RETURN;\r\n ENDPROCEDURE;\r\n PROCEDURE TM1Param;\r\n START;\r\n -- todo - read telemetrySet1 from DeviceInterface\r\n\r\n RETURN;\r\n ENDPROCEDURE;\r\n PROCEDURE TM2Param;\r\n START;\r\n -- todo - read telemetrySet2 from DeviceInterface\r\n\r\n RETURN;\r\n ENDPROCEDURE;\r\n start;\r\n nextstate wait;\r\n state wait;\r\n endstate;\r\n\r\n\r\nENDPROCESS DemoDemoDeviceDSAP;\r\n\r\nENDBLOCK;\r\nENDSYSTEM;\r\n'
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment