WIP

liphe · Apr 8, 2020 · dfaedf2 · dfaedf2
1 parent e9e4726
commit dfaedf2
Show file tree

Hide file tree

Showing 3 changed files with 9 additions and 2 deletions.
diff --git a/packages/liphe/components/Explorer/Expression.tsx b/packages/liphe/components/Explorer/Expression.tsx
@@ -6,6 +6,7 @@ import { GenericSyntaxExplorer } from "../PPrinter";
 import { BooleanExplorer } from "./Boolean";
 import { useTypeNormalizer } from "./common";
 import { FunctionExplorer } from "./Function";
+import { FunctionCallExplorer } from "./FunctionCall";
 import { NoneExplorer } from "./None";
 import { NumberExplorer } from "./Number";
 import { RecordExplorer } from "./Record";
@@ -35,6 +36,10 @@ export const ExpressionExplorer: React.FC<{
       return (
         <RecordExplorer record={{ ...expression, node: expression.node }} />
       );
+    case "function-call":
+      return (
+        <FunctionCallExplorer call={{ ...expression, node: expression.node }} />
+      );
     default: {
       const normalizer = useTypeNormalizer();
       return (

diff --git a/packages/liphe/components/PPrinter.tsx b/packages/liphe/components/PPrinter.tsx
@@ -76,6 +76,7 @@ function DefinitionExplorer({
 }
 
 const Code = styled.pre`
+  display: inline-block;
   background-color: white;
   padding: 5px;
   font-family: courier;

diff --git a/packages/liphe/pages/index.tsx b/packages/liphe/pages/index.tsx
@@ -8,9 +8,10 @@ import { PageLayout } from "../components/PageLayout";
 
 export default function Homepage() {
   const [code, setCode] = useState(`
-(lambda (f x)
+(lambda (f g h x)
   (print x)
-  (f)
+  (f 1 2 3 "foooooo")
+  (g 1 2 3 "foooooo" (h "foo" "bar") 10)
   )`);
 
   const [module, setModule] = useState<Delisp.Module<Typed>>();